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Cbe cm* 4 un programma? 

Jl solo computer non può compiere alcuna operatore, 

CJn computer possiede poterete liti ma, come una macchi* 
na aerea bereina. aerea un programma, non può funziona- 
re. 

La maggior parte dei programmi pubblicati tu SU PERVIO 
per i computer Commodore sono scritti in un linguaggio 
per calcolatori chiamato BASIC, Il BASIC è facile da impa- 
rare ed à disponibile, di serie, rei V1C 20 e nel Commodore 
64 , 

Programmi BASIC 

Ogni mese, SGPERV1C pubblica programmi aia per il VIC 
che per il 64. Tanto per cominciare, se possiedi un V1C co- 
pia solo l programmi aerini per la tua macchina indicati 
con "versione per V|C 20". Più tardi, quando avrai acquisi- 
to esperienza con II BASIC del tuo computer, potrai cercare 
di copiare e convertire certi programmi per altri calcolato- 
li Diversamente dal linguaggio corrente, che può essere 
variamente Interpretato, Il BASIC di solito ha un solo modo 
corretto per indicare qualcosa. 

Ogni lettera, carattere, o numero ha il suo significato. 

Un errore banale è costituito dalla sostituzione nel numero 
"0" con la lettera "O" oppure II carattere minuscolo T In- 
vece del numero "V o ancora 11 carattere maiuscolo "B" 
con 11 numero "8", 

Devi anche inserire tutta la punteggiatura, I due punti (:) e 
le virgole copiando esattamente ciò che appare sulla rivi- 
sta. Gli spazi possono essere Importanti. Per essere sicuro, 
copia il datato esattamente corre si presenta. 

Le parentesi e 1 caratteri speciali 

L'eccezione per questa regola di copiatura si presenta 
prendo Incontrerete Indicazioni tra parentesi quali; 

Ogni cosa compresa tra parentesi è un carattere speciale 
oppure un carattere che non può essere facilmente prodot* 
to con la stampante. Incontrando un carattere di questo ti- 
po fate riferimento alla “Piccola guida per ] '"input del pro- 
grammi". 

Le Istruzioni DATA 

Alcuni programmi contengono una sezione, o delle sezio- 
ni, di Istruzioni DATA. Queste Uree di Istruzione fornisco- 
no le necessarie informazioni di cui 11 programma ha biso- 
gno, 

fn alcuni casi le Istruzioni DATA costituiscono il program- 
ma vero e proprio, altri contengono codici grafici. Queste 
linee sono particolarmente soggette agli errori. Se un solo 
numero in una linea di Istruzione DATA è sbagliato II cal- 
colatore potrebbe "piantarsi" o distruggere 11 programma. 
La tastiera e II tasto STOP appaiono Inattivi e lo schermo 
completamente vuoto. Non lasciarti prendere dal panico. 
Non si è verificato alcun danno. 


Per riprendere II controllo devi spegnere 11 computer e suc- 
cessi vament « riaccenderlo. Ciò cancellerà qualsiasi pro- 
gramma presente In memorie per cui è necessario sempre 
rare il SAVE del vostro programma prima di comandare II 
RUM, 

Se 11 computer si ferma puoi caricare (LOAD) Il programma 
e cercare l'errore. 

A volte, quando il programma viene "lanciato ', un'Istruzio- 
ne DATA errata può causare un messaggio di errore. 

11 messaggio di errore potrebbe riferirsi alla linea di pro- 
gramma che legge (READ) Il contenuto delle Istruzioni 
DATA, 

Come conoscere 11 computer 

Dovresti prendere confidenza con 11 computer prima di pro- 
cedere alla copiatura del programma. 

Impara le Istruzioni che si usano per memorizzare e richia- 
mare I programmi da nastro o da disco. Dovrai conservare 
una copia del tuo programma se non vorrai copiarlo ogni 
volta che lo devi usare. Impara ad usare le funzioni di "edi- 
ting" della tua macchina. Come puoi correggere un errore? 
Puoi sempre ricopiare te linea e In questo caso devi sapere 
come procedere. Sapresti come inserire I caratteri In "In- 
verse", I caratteri minuscoli e quelli di controllo? 

Tutto dò è spiegato nel manuale del calcolatore. 

Cin veloce ripasso 

1 ) Copiare il programma una linee alla volta, con ordire. 
Premere RETURN alla fine di ogni lina*. Osare 11 
tasto "DEL" per correggere gli errori 

2) Confrontare la linea copiata con quella presente nella 
rivista. Puoi controllare Unterò programma nel caso 
In cui si presenti un errore quando esegui il RUM del 
programma. 

3) Accertati di avere Inserito le istruzioni tra parentesi 
graffe con gli appropriati caratteri di controllo (fai rife- 
rimento alla “Piccola guida per r* Input” del pro- 
grammi" che trovi In questa stessa rivista). 

Slamo spiacenti di non poter rispondere alle singole richie- 
ste di Informazioni circa 1 programmi, prodotti, o 1 servizi 
apparti su SUPER VIC. Net caso un programma pubblicato 
contenga un errore tipografico, la correzione apparirà. In 
una apposita rubrica, su un successivo numero delle rivi- 
sta. 


Se avete domande particolari sul programmi pubblicati da 
SUPERV1C scrivete a: 

SU PER VIC 
J. loft Editrice 
Via RotallEnl, 12 
20124 MILANO 
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A vrete tutti seguito fe voi versi delle riviste nel settore delia '"piccola in* 
Aformatica", quella del personal e home computer per intenderci. Molti 
editori hanno rivolto il proprio interesse alla diffusione di riviste su cassetta 
che. tra feltro, hanno riscosso da parte del pubblico un certo successo. Poi 
['escalation ai vertiginoso ritmo di una nuova testata la settimana. 
Tralasciando volutamente l discorsi circa la provenienza del materiate con 
cui alcuni di questi prodotti vengono confezionati (qualcuno, prima o poi, 
se ne accorgerà e allora... ) passiamo a rispondere alla domanda che legitti- 
mamente cl potreste porre: “e voi..,?'’. 

Dal canto nostro abbiamo scelto il tradizionale supporto cartaceo per tutta 
una serie di motivi che, per quanto soggettivi, cl hanno trovato, in redazio- 
ne tutti d'accordo. 

L utilizzo del computer, qualunque esso sìa, richiede una certa manualità e 
tale attributo si acquisisce solo mettendo mano alla tastiera, meglio se per 
battere un buon programma. 

Ci sono a questo punto due modi di digitare un programma: il modo "sco- 
piazzo" e il modo intelligente; praticando il primo l'arricchimento personal* 
culturale sarà alquanto scarso; nel secondo caso invece, quel io intelligente, 
il programma, preso In qualche caso a pretesto, sarà assai utile alla corri' 
prensione del linguaggio, del modo in cui il calcolatore lavora, ecc. ecc. 
Eseguire la battitura di un programma cercando di capire il perché di una 
particolare istruzione e sforzandosi di comprendere il significato è certa- 
mente uno dei migliori modi per avvicinare e capire Ja propria macchina. 
C'è poi, per i più "tosti" (mi pare che il gergo prevedo tale termine per defi- 
nire i più bravi) la possibilità di porre mano aJ programma modificandone il 
funzionamento a proprio gusto. 

In ogni caso per chi non dovesse condividere la nostra filosofia c’è sempre 
la possibilità delfabbonamento che. oltre alla rivista, prevede la cassetta 
con l programmi pronti al fuso. 

Ben vengano quindi ie pubblicazioni "pret-a-porter"; noi, fedeli a quello che 
da sempre è il mezzo più efficace per l'apprendimento, proponiamo 11 soft- 
ware su carta che richiede si un maggior lavoro per f utente ma,,, vuoi met- 
tere poi la soddisfazione?!! 

Pietro DeH'Orco 
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NON 

UN ABBONAMENTO 

ON SUPERABBONAMENTO 


Questo è ciò che la J ,soft ti offre: un superabbonamento ad una rivista! 
Una eccezionale offerta di lancio: 15 numeri di SUPERVIC ad un prezzo di 
10 oltre la possibilità esclusiva di ricevere mensilmente, con la copia della 
rivista, il supporto magnetico con tutti ì programmi pubblicati. 



L’offerta è valida fino al 31/8/1984. 


LE NOSTRE SUPERPROPOSTE ABBONAMENTI 

Abbonamento* a 15 numeri (4 nel 1984 + 11 nel 1985) 
di SUPERVIC al prezzo speciale di L. 35.000 
anziché L, 56.000. 

Abbonamento* a 15 numeri di SUPERVIC + 15 cassette 

con tutti i programmi pubblicati ai 

prezzo speciale di L. 75.000, anziché L. 120.000. 


‘L'abbotta mento d «corra ri dal prosaimo numaro 


Abbonarsi è semplice! Effettuate II versamento con l'apposito modulo 
c.c.p. Inserito in questo fascicolo, oppure ritagliate il tagliando 
abbonamenti pubblicato in questa pagina e speditelo allegando un 
assegno intestato a: 

J.soft • Via Roseiiini 12-20124 Milano. 


Tagliando abbonamento a SUPERVIC da inviar# In busta chiusa a: 

J MOft - Via Rosai lini 12 - 20124 Milano 

H De* cero tettoie vi r# un àHbcn*ir*nlo a T5 r*i/T>*rl (4 r»#* 1964 + ti 1965) d> SUPERVIC «3 
patirò spetti* di l 35 000 *r* tché L 56 000 

C Dmx» f Q sottotcrw* jr iotoor#p>r*io a iS duman (4 r* 1964 + 1 i nel 1065) i$ SUPERVIC 
+ 1 S esistette con lutti i &QQi*mrà ouObiiciii < prezza sete** a L 75 000 mi c*ié L 1 20 000. 
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La marno ria dal CS4 

Ho acquistato da poco un C64. ed ho 
scoperto che sono ut Mutabili par I miei 
osi In BASIC solo circa 38 Kbyte della 
sua memoria RAM. Ho però scoperto 
una POKE che permette di aumentarla 
di 5888 byte; il sistema è questo: 
Spegnete e riaccendete II C64 e digita- 
te quanto segue: 

PRIMI FRE (0) 

POKE 56. 137 
PR1MT FRE (0) 

Dopo il primo PRIMT FRE<0> il risulta- 
to è —26627* mentre dopo la POKE é 
—32315* con una differenti appunto 
di 3888 byte* 

La mia domanda è: si e effettivamente 
verificato un aumento della memoria 
disponìbile e, se sì, può questa proce- 
dura creare del problemi al computer? 

Italo Strambi ni 

R* La locazione di memoria interessata 
dalla POKE é uno dei due byte (55 e 
56) che indicano al sistema operativo 
del C64 quale sia l'Indirizzo più alto 
usato dal BASIC Come hai scoperto 
queste locazioni possono essere ‘po- 
kate' con nuovi valori, ed in particola- 
re modificando le 56 si comunica al si* 
sterna operativo che è cambiato il TOP 
del BASIC, I valori normali delle loca* 
zlonì 55 e 56 sono rispettivamente 0 e 
160. che indicano che II TOP del BA- 
SIC il trova a 40960 (0 + 256‘ 1601 Se 
si ’poka" un valore maggiore di 160 
nella 56* si fa credere al computer di 
disporre di una quantità di memoria 
superiore a quella effettivamente di- 
sponibile. Se invece II valore è minore 
di 160. si ottiene l'effetto di abbassare 
il TOP del BASIC e quindi di diminuire 
la quantità di RAM per riservare spazio 
per routines in linguaggio macchina 
che il trovano anche automaticamente 
protette dalla sovrascrittura di pro- 
grammi BASIC. È ovvio che tutto ciò 
non danneggia assolutamente II com- 
puter. 


Per re set tare I puntatori ai loro valori 
standard, basta spegnere e riaccendere 
la macchina: in ogni caso la modifica 
indiscriminata di questi puntatori può 
provocare cose molto strane quando si 
esegue un programma BASIC* 

Leggere J file con 11 kernel 

Come posso leggere dati dal mio disk 
drive attraverso il bus seriale? Operan- 
do In BASIC cl vuole troppo tempo, ed 
ho pensato alla possibilità di utilizzare 
te routine Kernal ACPTR* TALK e 
TK5A. Ho provato ad aprire tramite 
BASIC un canate dì lettura de disco, 
poi con una SYS passo ad un breve 
programma In linguaggio macchina 
che usa queste routine Kernal* sfortu- 
natamente ottengo solo una stringa di 
~G~ ihlftate invéce del file sequenziale- 
che cercavo. Ho cercato di seguire at- 
tentamente tutte le istruzioni del ma- 
nuale* ma purtroppo sema alcun esito 
positivo: potete aiutarmi? 

Sandro Sauna 

R. Le uniche routine Kernel ch^ servo- 
no per leggere da file sequenziali sono; 
CHK1N IFFC6 * apre un input 
GETIN - IFFE4 - prende un carat- 
tere 

CLRCHN - *FFCC - setta l'Input alla 
tastiera 

(Non dimenticare dì leggere la variabile 
riservata ST per trovare la fine del file* 
Diamo un semplice programmino per 
leggere un file e visualizzarlo sullo 
schermo: 

100 DATA 162X32.196*255 

11 0 DATA 32*220,255,32*210*255* 

166 144 

120 DATA 240*246*32*204*255*96 
130 POR J - 828 TO 846 
140 READ X: POKE J.X 
150 NEX1 J 

160 INPUT NOME DEL FILE 1 : Ni 

170 open i&xm 
160 SYS 82$ 

190 CLOSEl 
200 END 



È un programma molto semplice, ma 
Il permetterà di vedere come un sem- 
plice uso di queste tre routines Kernal 
raggiunga lo scopo prefissato. 

Misteri del ditàisette 

Possiedo un Commdore 64 ed ho un 
problema al quale forse voi potete ri- 
spondere* Il cavo piatto metallico che 
esce dalla spina del Datassette # acci- 
dentalmente entrato in contatto con 
una connessione metallica della User 
Pori ed ha danneggiato alcuni chip del 
mio C64: ho dovuto farlo riparare e* 
benché avesse solo cinque settimane 
di vita. Il danno non è stato coperto 
dalla garanzia. Nel manuale di istruì io 
ni fornito con II Datassette non si fa 
menzione né delle funzioni di questo 
cava, né dei possibili fan ni che può ar- 
recare* quindi spero possiate dare una 
risposta a questi q Destiti. 

Franz Brandanlnl 

R. Il cavo di massa del Datassette non 
é necessario per l'uso con 11 C64 o con 
il Vie 20, Infatti non esiste neppure al 
cun posto sullo chassis del computer 
dove poterlo collegare* Se il cavo do- 
vesse venire a contatto con I pin metal- 
lici della User Pori potrebbe effettiva- 
mente provocare un danno di natura 
permanente al computer, quindi il mi- 
glior sistema per evitarlo é quello di 
avvolgere tale cavo intorno alla spina 
di connessione e fissarlo con un po dì 
nastro adesivo- 

Oppure lo si può più radicalmente ta- 
gliare* ma facendo prima una conside- 
razione: questo cavo è invece richiedo 
per l'uso del Datassette con I computer 
Commodore della serie commerciale* 
In quanto richiesto dalle norme FCC 
americane. Un Datassette in te rf acciaio 
ad uno di questi calcolatori senza tale 
collegamento può provocare notevoli 
Interferenze ad apparecchi radio o IV 
posti nell vicinanze. Quindi se siete si- 
curi di usare il vostro Datassette solo 
con il VIC O li C64, tagliate pure II cavo 
senza problemi. 
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Per collaborare a SUPERVIC 


La maggior parte del seguenti suggerimenti ha lo scopo di migliorare l’accuratezza e la velo- 
cità di pubblicazione di un articolo; rispettando questi consigli si accresceranno le probabl* 
liti che un vostro lavoro venga pubblicato. La rivista è Interessata ad articoli e programmi 
riguardanti la linea Commodore, Siamo più interessati al contenuto di un articolo piuttosto 
che al suo stile, e soprattutto gli articoli devono essere chiari ed esaurienti. La seguente 
"guida" permetterà che le vostre buone idee e ì vostri programmi vengano più facilmente 
accettati per la pubblicazione; 


1 l'angolo superiore sinistro della prima pa- 
gina dovrò contenere: nome, cognome, In- 
dirizzo, numero telefonico, codice fiscale e da- 
ta di spedizione. 

2 l’angolo superiore destro della prima pagi- 
na dovrà contenere la marca e II tipo di 
computer al quale 11 lavoro si riferisce, unita- 
mente ad eventuali espansioni di memoria o 
periferiche richieste. 

3 il titolo sottolineato deH’articolo dovrà ini- 
ziare a circa due terzi In altezza della pri- 
ma pagina. 

4 le pagine seguenti potranno essere battu- 
te normalmente, con la condizione che 
l’angolo superiore destro contenga un’abbre- 
viazione del titolo e del cognome, unitamente 
al numero di pagina. Per esempio, Sprite 
EdJBramblKla/2. 

tutte le lìnee del testo dell’articolo dovran- 
no essere battute con spazio 2 o spazio 3, 
e un margine di circa un centimetro dovrà tro- 
varsi ad entrambi i lati dello scritto. 

6 dovrà essere usata una carta formato A4 e 
lo scritto dovrà occupare un solo lato del 
foglio (caratteri maiuscoli e minuscoli). 

7 l fogli dovranno essere uniti con una clip. 

8 avendo Intenzione di spedire più di un arti- 
colo, questi dovranno essere inviati sepa- 
ratamente insieme alla rispettiva copia su 
supporto magnetico, 

9 programmi brevi (meno di 20 linee) potran- 
no essere inseriti nel testo, mentre pro- 
grammi più lunghi dovranno essere listati se- 
paratamente. È ESSENZIALE per noi disporre 
di una copia del programma registrata più vol- 
te su supporto magnetico, ed anche su en- 
trambi I lati nel caso si usino cassette. È pre- 
ferìbile usare nastri di buona qualità e di lun- 
ghezza non eccessiva; la cassetta o il disco 
dovranno essere etichettati con II nome 
dell’autore, li titolo deH’articolo, il computer 
interessato e soprattutto le eventuali espan- 
sioni richieste. Come suggerimenti di pro- 


grammazione, si consiglia di usare le istruzio- 
ni "CHR$ (x )’’, "TAB (X )’\ "SPC {x )" piutto- 
sto che stringhe di manipolazione del cursore. 
Ad esempio per uno scroll di 5 linee, l’istruzio- 
ne "FORI - 1T05:PRINT:NEXT è molto più in- 
terpretabile di 5 Q inverse; e, Invece di una 
dozzina di simboli di cursore a destra, perché 
non usare semplicemente "PRINT SPC (12)”? 
Un rapido controllo dei programmi per operare 
queste sostituzioni sarà molto apprezzato da 
noi e dal lettori. 

per maggior chiarezza, è conveniente 
usare caratteri maiuscoli riferendosi a 
istruzioni BASIC (esempio RETURN, USX, 
RND, PRINT, etc.). Se si desidera evidenziare 
una parola, è preferibile sottolinearla piutto- 
sto che scriverla in carattere maiuscolo, 

n gll articoli ed i programmi potranno ave- 
re qualsiasi lunghezza - da una routine 
di una sola linea fino a programmi molto com- 
plessi. 

volendo Includere fotografie, queste do- 
vranno essere in formato 24 x 36 o 6x 6, 
in bianco e nero o diapositive. 

non prenderemo in considerazione arti- 
coli che siano stati sottoposti ad oltre 
case editrici. 

M il compenso per la collaborazione pre- 
stata sarà commisurato olla complessi- 
tà e airinteresse del programma (da un mini- 
mo di L. 50.000 ad un massimo di L. 300.000). 
il pagamento è effettuato in caso di pubblica- 
zione del lavoro. 

il materiale ricevuto e non pubblicato 
non verrà restituito. 

Spedite i vostri lavori ai 

SUPERVIC 
Via Rosellini, 12 
20124 Milano 

e saremo lietissimi di pubblicare I contributi 
migliori. 

La Redazione 
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Prepararsi a un esame di matematica è 
un lavoro che richiede una lunga serie 
di eserciti che, idealmente, dovrebbe- 
ro essere controllati e corretti volta per 
volta. 

Pion sempre tuttavia è disponibile un 
insegnante dotato del tempo e delta 
pazienza sufficienti, con II risultato che 
spesso II candidato si presenta al mo- 
mento del test con una preparazione 
frammentaria causata dal fatto che 
non conosce a sufficienza quali siano 
te sue are* più deboli. 

Per aiutare chi ha problemi di questo 
tipo la Commodore ha realizzato per il 
V1C 20 una serie dì due programmi 
chiamati "Mathematica ', Il cui scopo è 
proprio quello di far ripassare allo stu- 
dente tutti quegli aspetti dell' aritmeti- 
ca, dell'algebra e della geometria ne- 
cessari per ben figurare In un esame e 
di segnalare eventuali aree che neees- 
sitino di ulteriori approfondimenti. 

I programmi sono memorizzati su cas- 
setta e girano su un V1C 20 dotato al- 
meno di 8 K di espansione. 

II primo programma contiene I seguen- 
ti argomenti: 

■ Matematica In generale 

* Aritmetica 

• Algebra 

* Geometria 

• Trigonometria 



Un tipico esempio di applicazione di 
"Superbase" 


Mathematica I 
e Mathematica II» 

Il professore a casa 



Sono previste anche due sezioni che 
coprono tutte le materie viste finora 
presentando domande brevi o proble- 
mi più lunghi. 

Una volta scelto Targomento il VIC 20 
carica dal nastro dati le domande rela- 
tive e comincia a porle. 

Per ogni test sono possibili diverse va- 
rianti, come: porre un limite di tempo, 
sapere immediatamente se la risposta 
data è giusta o sbagliata, oppure avere 
la "correzione" alla fine, 

I quiz sono del tipo "multiple cholce 1 ' 
oppure richiedono una risposta unica* 
composta da parole o numeri* 


Alla fine del test 11 VIC 20 segnala 11 nu- 
mero delle domande giuste, errate e di 
quelle che non hanno avuto risposta* 
rivedendo tutta la sequenza se lo stu- 
dente lo desidera. 

Fatto ciò è possibile continuare con un 
altro lesi sullo stesso argomento, op- 
pure passare a un altro. 

Le possibilità offerte dal programma 
numero due sono le stesse* vengono 
coperti tuttavia argomenti differenti, e 
particolarmente: 

* Aritmetica 

* Equazioni 

* Progressioni 

* Studi di funzioni 

* Differenziali e integrali 

* il Teorema di Pitagora 
» Trigonometria 

t programmi sono strutturati sulla base 
delle esigenze dello studente delle su- 
periori americane, tuttavia l'ampiezza 
delle materie coperte è tale che do essi 
possono trarre beneficio anche i bam- 
bini italiani delle elementari se aiutati 
da un adulto, l ragazzi delle medie, I li- 
ceali e tutti gli universttari di facoltà 
come Biologia e Medicina, nel cui pia- 
no di studi sia compreso un esame di 
matematica* 

Mathematica ] e Mathematica 11 Com- 
modore sono in vendita a Lit. 24.300 
4 IVA cad. 


Superbase 


U n calcolatore è una macchina parti- 
colarmente Idonea* per le sue ca- 
ratteristiche Intrinseche, a svolgere 
compiti ripetitivi e noiosi, che tuttavia 
richiedono una notevole precisione. 
Per questo motivo uno del lavori dele- 
gati più spesso alla elaborazione elet- 
tronica è appunto la gestione degli ar- 
chivi. 

Le capacità di un sistema di archivia- 


zione dipendono però moltissimo dal 
programma scelto* pertanto un calco- 
latore con grosse possibilità dal punto 
di vista teorico avrà prestazioni sca 
denti se non sarà dotato del program- 
ma adatto. 

Alla ampia gamma di programmi ca- 
paci di trasformare 11 C64 da supervi- 
deogico a utilissimo strumento di lavo- 
ro la Commodore ha recentemente ag- 



giunto il Superbase, un programma di 
archiviazione multiuso in grado di reg- 
gere validamente il confronto con ì mi- 
gliori sistemi professionali 
Tramite il Superbase è infatti possibile 
gestire con successo qualsiasi proble- 
ma di archiviazione, creando di volta 
in volta la 'scheda" del formato più 
adatto alle esigenze dell'appl (castone 
stessa. 

Essendo un databas multiuso, cioè 
non dedicato alla risoluzione di un pro- 
blema particolare, il Superbase con- 
sente inoltre la creazione di un numeri 
illimitato di archivi ciascuno con la 
suo scheda specifica. 

Per fare un esempio: con questo pro- 
gramma è possibile archiviare i clienti 
in uno smallo business, tenere sotto 
controllo la manutenzione e i consumi 
di una parco veicoli e inventariare olio 
stesso tempo una collezione di franco- 
bolli 

Va inoltre sottolineato il fatto che que- 


sto software è in grado di gestire sche- 
de fino a 1 108 caratteri ciascuna, sud- 
divise a lor volta in 127 sottisezìonì 
(nome* Indirizzo eccetera)* 

E possibile inoltre ricercare i dati intro- 
dotti secondo qualsiasi chiave di ricer- 
ca, o combinazione di esse, e decidere 
caso per caso quale sia il formato di 
presentazione dei risultati ottenuti. 

Un esempio della grande utilità di que 
sta funzione è rappresentato dal fatto 
che tramite il Superbase è possìbile 
stampare anche etichette autoadesive 
con l'indirizzo, senza dover ricorrere a 
programmi appolsitì: inoltre è in grado 
di effettuare calcoli di qualsiasi genere 
su dati memorizzati, e di presentare I 
risultati ottenuti nel modo desiderato 
dall’utente. 

Risulta estremamente semplice in tal 
modo eseguire elaborazioni statistiche 
(fatturato totale, consumo medio di 
ciascun veicolo, valore complessivo 
del francobolli tedeschi, per fare un 


International soccer 


C on International Soccer, il video- 
gioco del aldo recentemente pre- 
sentato dalla Commdore, il C64 dispo- 
ne di un gioco di simulazione sportiva 
in grado dì competere ad armi pari con 
un videogame da bar. 

Una cartuccia -gioco e uno o due joy- 
stick sono quanto basta per organizza- 
re avvincenti tornei di calcio a squadre 
di nove giocatori. Gli eccezionali effet- 
ti grafici e sonori e l'aita velocità di 
movimento di calciatori conferiscono 
alle partite giocate con International 
Soccer un realismo e una fedeltà al 
gioco originale mai riscontrate prima 
d ora in un video game ispirato al gio- 
co del calcio. 

All'inizio di ogni partita è possibile 
scegliere 11 colore delle maglie per le 
squadre che scenderanno in campo* 
Chi gioca contro il computer può an- 
che selezionare ìl livello di difficoltà 
della partita, che varia da uno a nove. 
Al livello più alto, il computer simula 
perfettamente il comportamento di 
gioco di un avversario umano, e darà 
filo da torcere anche ai videogiocato ri 
più esperti* 

Ogni incontro è preceduto dall'ingres- 
so in campo dei giocatori, che a passo 
dì corsa vanno a prendere posto sul 
terreno di gioco* Il fischio delTarbitro 
segna II calcio di inizio, e la partita in* 
comincia, I tabelloni sulle tribune ri- 
portano l'indicazione del punteggio e 
del tempo di gioco. 

Ogni partita è composta da due tempi 
di 200 secondi ciascuno, separati da 
un intervallo durante il quale le squa- 
dre fanno ritorno agli spogliatoi. 
Muovendo il joystick nelle quattro di* 
razioni sì controlla un giocatore per 


volta, mentre il resto della squadra se- 
gue l movimenti della palle lungo il 
campo. Il giocatore controllato dai joy- 
stick è solitamente quello più vicino al 
pallone in ogni momento della partita, 
ed è facilmente distinguibile per il co- 
lore della maglia, dì una tonalità diver- 
sa rispetto a quella dei propri compa- 
gni dì squadra, 

Gna cartuccia-gioco e uno o due joy- 
stick sono quanto basta per organizza- 
re avvìncenti tornei di calcio a squadre 
dì nove giocatori. Chi prende 

possesso della palla può eseguire drib- 
bling, fìnte, passaggi in avanti e allln- 
dietro e mettere in pratica qualsiasi 
azione di gioco come se giocasse una 
vera partita dì calcio. Per calciare il 
pallone durante un passaggio o una 
azione in porta, è sufficiente premere il 
bottone di spero del joystick. Attenzio- 
ne però aì confini del campo: in Inter 
nationat Soccer* come nel caldo dal 
vivo, esistono le rimesse in gioco late- 
rali e dal fondo campo, e persino i calci 
d'angolo. I portieri sono anch'essi co- 
mandati dal joystick: per effettuare 
spettacolari parate basta premere il 
pulsante di sparo quando ìl pallone en- 
tra in area di rigore. 

Al termine della gara, segnati dal clas- 
sici tre colpi dì fischietto, allo scadere 
dei 200 secondi del secondo tempo, la 
premiazione: il capitano della squadra 
vincitrice riceve dalle mani di una 
splendida fanciulla la coppa della vit- 
toria tr le gradi di esultanza della folla 
sulle tribune, 

International Soccer è un gioco ad alto 
contenuto tecnologico, scritto intera 
mente in linguaggio macchina e resi- 
dente su una cartuccia a caricamento 


esempio) e includere i risultati in rap- 
porti e lavori di qualsiasi tipo, 
Nonostante la sua potenza e la sua 
estrema versati Ità il Superbase è estre- 
mamente felle da usare anche per chi 
non ha alcuna epserìenza di calcolato- 
ri. 

Tutte Je funzioni sono infatti comanda- 
te da menu, mentre tutti i comandi che 
implicano la cancellazione permanen 
te di dati devono essere ripetuti due 
volte. 

Da sottolineare infine una funzione 
operativa che sinora era disponibile 
solo sui grossi sistemi: quella di 
"help". 

Premendo un apposito tasto è Infatti 
possibile chiedere al calcolatore come 
debba essere introdotto un determina- 
to comando o come uscire da una si- 
tuazione difficile* 

Superbase Commodore 64 è in vendita 
a L, 175.000 + IVA. 



istantaneo che va inserita nell'apposita 
fessura sulla parte posteriore del com- 
puter, 

Per creare le sagome del giocatori è 
stata utilizzata la ben nota tecnica de 
gli sprltes* i blocchi i punti colorati che 
compongonop le figure dei giocatori. 
Il C64 consente di generare e animare 
gli sprites e di utilizzarli per creare fi- 
gure composte di qualsiasi forma, che 
permettono di realizzare programmi di 
animazione e videog lochi di notevole 
realismo. 

International Soccer Commodore è in 
vendita a L. 41,000 + IVA. 


Mathematica I e 
Mathematica II, 11 
professore in casa 
Superbase International 
soccer sono importati e 
distribuiti da: 
COMMODORE ITALIA spa 
via Gracchi, 48 20092 
Clnisello Balsamo (Milano) 
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stampante grafica “dedicata” per 
computer Commodore 64 e vie 20 : 


SEIKOSHA 



> » att 





Dal “De- 
sign” sempre pia- 
cevole e dal prezzo in- 
credibilmente contenuto, la 
qualità offerta da questa supere- 
conomica è esattamente quella 
che ci si attende da una stampante 
con il nome Seikosha! 

GP100 è stata infatti la prima stam- 


pante ad avvi- 
cinare il mondo 
òellTiome compu- 
ting con costi pro- 
porzionati e presta- 
zioni ineccepibili in ter- 
mini di qualità di stampa 
e affidabilità; questo come risultato di 
un’economia di scala e non di progetto. 


Caratteristiche: 

• Stampante ad impatto a matrice di punti 
da 80 colonne 

• Matrice di stampa 5x7 

• Percorso di stampa mon ©direzionale (da 
sinistra a destra) 

• Capacità grafiche con indirizzamento del 
singolo dot 

• Possibilità di ripetizione automatica di un 
carattere grafico 

• Velocità 30 caratteri /secondo 


• Caratterizzazione: 10 cpi e relativo espanso 

• Interfaccia: specifica per Commodore V1C 
20 e 64 

• Alimentazione carta: trattori (larghezza 
modulo continuo variabile da 4.5 a 10") 

• Stampa 1 originale e 1 copia 

• Set di 116 caratteri ASCII 

• Consumo 8W (standby) o 20W (stampa) 

• Peso 4,5 KG 

• Dimensioni: 

234,5 (prof.) x 420 (largh.) x 136 (alt.) mm. 

• Nastro: singolo colore su cartuccia dedicata 



di F. D' Ignazio 

trad. ed adatt. di M. Crfstulb Grizzi 


Il libro del futuro: 
elettronico 
ed infinito 


R ecentemente sono stato ad uno 
conferemo di editori a Baltimora, 
dove ho incontrato un amico editore di 
una delle maggiori case editrici di New 
York. Il mio amico è un avido utente di 
"homc computer" , e pubblica libri di 
Fantascienza. 

Egli amo molto guardare nella sua sfe- 
ra di cristallo da editore e poi riconta- 
re che cosa ci vede dentro. Cosi, quan- 
do guardò nel futuro, vide computer 
dappertutto. Ma non vide libri. IHem* 
meno vide parole, solo immagini — 
Immagini generate da computer — e 
suoni. "Nel Futuro tutti I romanzi, tutta 
r informazione e tutta la conoscerla", 
— mi disse enfaticamente — "sora ge- 
stita elettronicamente dai computer 
sotto forma di immagini e suoni". 
Daccordo con il mio amico, "I compu- 
ter possono già leggere automatica- 
mente del libri alla gente: cosi, perché 
mal si dovrebbe ancora Imparare a leg- 
gere? La lettura sta diventando un oc- 
cupazione obsoleta, come parlare il la- 
tino". 

Computer CI mani 

Aveva ragione II mio amico? Dopotut- 
to, guardiamo che cosa hanno fatto I 
computer e le calcolatrici per i proble- 
mi di calcolo. In effetti In Inglese la pa- 
rola "computer" è anche usata per de- 
finire una persona che possa eseguire 
agilmente calcoli aritmetici nella sua 
mente. Ancora oggi molti adulti usano 
per Fare delle moltiplicazioni piccole 
"tabelline" mentali, e tutto un Insieme 
di regole su come fare addizioni, sot- 
trazioni, divisioni, ed altre elementari 
operazioni aritmetiche. 

Ma ormai non usiamo più troppo spes- 
so queste nozioni di calcolo: abbiamo 
tutti quanti delle piccole calcolatrici 
che stanno perfettamente nelle nostre 
tasche e, se ci capita di dover eseguire 
qualche calcolo più complicato del so- 
lito, tiriamo fuori di tasca la nostra cal- 
colatrice. premiamo un paio di pulsan- 
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IL ed otteniamo il risultato che ci servi- 
va. Perché mal dovremmo ricordare II 
modo di eseguire i calcoli aritmetici 
quando un piccolo cervello elettronico 
io ricorda già In vece nostra? 
Logicamente, Ja maggior parte di noi 
non prende la decisione di abbandona- 
re l'aritmetica. Tuttavia stiamo abban- 
donandola ugualmente, volenti o no- 
lenti: meno spesso la pratichiamo, più 
elevati diventano i nostri sforzi mentali 
per eseguire un calcolo, e le varie rego- 
le e "tabelline" nella nostra memoria 
Iniziano a dissolversi. 

Annessione mi cervello 

La stessa cosa sta accadendo nelle no- 
stre scuole: i calcolatori stanno diven- 
tando comuni come le biro e ta carta 
nelle lezioni di matematica. Gli Inse- 
gnanti possono giustificarlo spiega n- 
do come ciò possa liberare i loro stu- 
denti dai compili più meccanicistici e 
ripetitivi, per dedicare più spazio ai 
concetti ed alle teorie che stanno die- 
tro ai semplici numeri. Il calcolatore si 
prende cura dei numeri. In modo che 
lo studente possa focalizzare gli assio- 
mi. i teoremi e le regole generali della 
matematica. 

Quando lo studente usa 11 computer, la 
matematica cessa di essere una noiosa 
disciplina di meccanica manipolazione 
di numeri e Formule; diventa Invece un 
bellissimo linguaggio — un processo 
dinamico ed attivo, un vocabolario di 
simboli che descrivono II mondo. Un 
allievo che studi la matematica sul 
computer si sente come 11 chimico che 
lavori in laboratorio, creando le più di- 
sparate reazioni chimiche. La matema- 
tica ha tessuto, tangibilità e potere di 
attrazione intellettuale; é viva e si evol- 
ve continuamente. J ragazzi potranno 
esplorare il mondo della matematica 
usando appositi programmi su compu- 
ter, e non avranno ancora a lungo la 
noia di perdersi In dettagli computa- 
zionali. 

Alcuni scrittori si sono spinti cosi in 
avanti nel futuro da prevedere dei mi- 
croscopici computer aggiunti al cer- 
vello umano. Il ragionamento di questi 
scrittori funziona pressapoco cosi: 
l'uomo ha inventato le macchine per II 
calcolo automatico perché il mondo 
stava diventando troppo complicato 
per essere compreso e controllato dal 
solo cervello umano. ì computer non 
sono altro che un'estensione del cer- 
vello umano; amplificano la potenza e 
la velocità del cervello in settori nel 
quali quest'ultimo é debole e lento. 
Con Taiuto di un cervello elettronico 
"annesso". Il cervello umano può ma- 
neggiare un grandissimo numero di 
dati; può manipolare e strutturare 
enormi quantità di Informazioni, e fare 
calcoli aritmetici alla velocità della lu- 
ce. 

Libri che sono caldi 

1 numeri non sono altro che simboli. 
Anche le Illustrazioni sono simboli, co* 


me ks sono le note musicali, le lettere e 
le parole. 

I computer sono straordinari manipo- 
latori di simboli; ricercatori di diverse 
università lo riconoscono, e stanno la- 
vorando a progetti che iniziano a di- 
ventare noti con il nome di "libro elet- 
tronico”. Essi sono convinti che la car- 
ta stampata, il principale sistema di 
trasmissione dì Informazioni, idee ed 
Immagini fin dal 1500. sarà presto 
soppiantata dai libri elettronici — un 
amalgama tra personal computer, lice* 
vitore TV. impianto stereofonico e te- 
lefono. 

1 libri elettronici devono avere tutte le 
più desiderabili caratteristiche dei libri 
su carta; le cartridges e gli apparati ne- 
cessari ai loro utilizzo devono essere 
economici, portatili e personali. 

I ricercatori che si occupano di questo 
progetto condividono le opinioni del 
mìo amico editore, almeno in parte. 
Essi temono che il libro elettronico del 
futuro possa supportare solo parole. 
Vorrebbero invece fare completo uso 
della manipolazione dei simboli e del- 
le potenzialità interattive del compu- 
ter. 

Per esempio, i libri elettronici devono 
essere "caldi". Secondo Marshall 
McLuhan, un mezzo di informazione 
"caldo" si rivolge a Uè sensazioni della 
gente, e più numerose sono queste ul- 
time, più completo è II mezzo. I libri 
elettronici potranno non avere la stes- 
sa sensazione al tatto e lo stesso fami- 
liare odore dei libri su carta, ma ne 
avranno dei sostituti "caldi": cartoni 
animati a colori, musica, effetti sonori, 
e voci. 

Essi dovranno essere interattivi; I letto- 
ri interagiscono con I libri su carta at- 
traverso l'uso della propria memoria 
ed immaginazione, interagiranno con 
quelli elettronici in modo più esplicito, 
rispondendo a domande direttamente 
poste dal libro tramite un sintitizzato- 
re di voce, scegliendo le Informazioni 
desiderate, ed operando scelte e deci- 
sioni. 

Libri "partecipativi" sono all'orizzonte: 
testi, romanzi, avventure direttamente 
interattive con il lettore. La prima ge- 
nerazione di "libri elettronici" esiste 
già sotto forma di simulazioni a scopo 
educativo e giochi elettronici di avven- 
tura per personal computer. 

Libri lutocostruitl 

Abbiamo visto a grandi linee come sa- 
rà Il libro del futuro; Interattivo ed 
eclettico. Ma sarà anche qualcosa di 
più. Non più creazioni statiche la cui 
forma finale appare solo quando ven- 
gono pubblicati per la prima volta, sa- 
ranno invece qualcosa come "libri in 
scatola di montaggio". Malleabili, invi- 
teranno l'utente ad operare alterazioni 
e modifiche sulla matrice originaria. 
Più di quaranta anni fa', Il grande 
scienziato americano Vannevar Bush 
sviluppò un'idea chiamata Memex. 
Meme* doveva essere, in parte, un li- 


bro elettronico; un libro che non sareb- 
be mai stato scritto per Intero. Ogni 
volta che 11 lettore avesse scoperto 
nuove associazioni, informazioni o 
nuova conoscenza, il libro sarebbe cre- 
sciuto ed evoluto. 

Le idee di Bush sono state poi svilup- 
pate dai Dr. Alan Kay. scienziato 
dell'AtarL e dal Dr. Andries Van Darri, 
alla Brown University di Providence, 
Rhode Islend. Kay e Van Darri stanno 
usando la moderna tecnologia microe- 
lettronica per costruire libri elettronici 
nel loro laboratori. 

Esistono già allo stato sperimentale li- 
bri elettronici che comprendono le mi- 
gliori caratteristiche del libro e del 
computer. Essi non sono mezzi di co- 
municazione a sola lettura ROM {Read 
Only Memory), ma sono mezzi di tipo 
'leggi e scrivi" RAWM (Read And Wrlte 
Memory). Permettono molteplici auto- 
ri; quando un libro viene "pubblicato ' 
su silicio, ha molto spazio libero ai 
suol "margini" per permettere ai lettori 
di scrivere I propri commenti ed anno- 
tazioni. Qualche libro permetterà an- 
che la duplicazione elettronica In più 
copie ed alterazioni del contenuto ori- 
ginate, In questo senso, il libro non sa- 
rà mal scritto per Intero; ogni nuovo 
lettore potrà diventare l'autore del li- 
bro e cambiarne il contenuto mentre Jo 
sta leggendo. 

Quando II lettore opererà queste modi- 
fiche al testo, userà un programma 
"editore dì testi" per modificare tutti 
gli aspetti del libro — testo, effetti so- 
nori. Illustrazioni (statiche o animate), 
musica e voci. 

nemici mortali 

Tutte queste previsioni incutono non 
poche ansie agli editori ed a tutti gli al- 
tri amici dei libro tradizionale. Gli 
amanti dei libro stampato su carta non 
sono ancora pronti per saltare sol leu 
tobus del libro elettronico. 

Oggi come oggi queste persone hanno 
due paure fondamentali: temono che II 
libro elettronico soppianti interamente 
Il libro su carta, e temono che i nuovi 
libri computerizzati supportino solo 
Immagini e suoni e non anche parole. 
In realtà queste paure sono ben fonda- 
te: il costo della carta come mezzo per 
l'Immagazzinamento delle Informazio- 
ni e per le comunicazioni è in costante 
aumento, mentre II silicio sta rapida- 
mente diventando sempre più econo- 
mico, In secondo luogo, E tipi di Infor- 
mazione che la carta può trasmettere 
sono limitati; caratteri, fotografie ed il- 
lustrazioni. Mentre i tipi di Informazio- 
ne che possono essere Immagazzinati 
su siitelo sono illimitati : musica, voci, 
fotografie, opere d'arte, cosi come te- 
sto tradizionale ed altri simboli posso- 
no essere facilmente Immagazzinati in 
un libro elettronico. Inoltre questo può 
essere istantaneamente alterato, ripro- 
dotto. trasferito a migliala di chilome- 
tri di distanza via modem e quindi reso 
disponibile ad altre persone ad un co- 
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11 libro del futuro 
elettronico 
ed infinito 
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sto bosso. 

Questo deve preoccupare gli amanti 
del libro tradizionale: se le parole non 
saranno ancora a lungo 11 mezzo domi* 
nante — o guanto meno più Importan- 
te — della comunicazione umana. Il 
leggere e lo scrivere potrebbero diven 
tare occupazioni obsolete, proprio co- 
me eseguire manualmente operazioni 
aritmetiche e parlare o scrivere In lati- 
no. 

Gli editori e gli altri amanti del libro su 
carta non hanno certo intenzione di 
aspettare passivamente il futuro: sen- 
no che una gigantesca battaglia sì sta 
preparando all'orizzonte tra mezzi di 
comunicazione stampati — da una 
parte — e mezzi computerizzati dall'al- 
tra J libri ed 1 computer essi lo sanno, 
sono nemici morteli che presto si 
scontreranno sul campo. 

Quando la battaglia seri terminata, so- 
lo un contendente sopravvi ve rè: il 
computer. Con il concepimento del li- 
bro elettronico l'era dei media su carte 
stampata sarà presto finita. 

La nascita dell'editore elettro- 
ni co 

Il graduale spostamento dalla carta aJ 
silicio è inevitabile, ma non accadrà 
certamente questa notte. Né per altro 
dovrà necessariamente significare la 
fine dei libri, delle parole, e la fine de- 
gli editori 

Gli editori del resto non sono soltanto 
dei meri manipolatori di libri e riviste; 
essi sono In realtà I guardiani dell'in 
formazione, della conoscenza, del l'ar- 
te e della cultura; in totale, della civil- 
tà. Come la civiltà venga conservata 
non è cosa importante fino a che sia 
protetta e sìa facilmente accessibile a 
tutti. 

Molti editori oggi amano chimarsl 
"specialisti del media"; essi rendono 
possìbile a bambini ed adulti l'accesso 
alla civiltà tramite questi media. 

Ora che stiamo avvicinandoci alta fine 
del ventesimo secolo, è un fatto che 
buona parte di ciò che rappresenta la 
nostra civiltà è stato digitalizzato ed 
immagazzinato In archivi elettronici 
Ciò non significa che l'editore dovrà 
diventare un ingegnere o un program- 
matore di computer: sarà soltanto ne- 
cessario che acquisisca l'uso delle nuo- 
ve macchine, poiché queste sono la 
porta e la finestra delle informazioni. 

La conoscerti* del computer 

Molti adulti non sono ancora pronti 
per l'approccio con il computer, e mol- 
ti ragazzi hanno solo una opportunità 
limitala di passare parte del loro lem 
po con un calcolatore. Negli Stati Uni- 


ti ai momento attuale, anche se ogni 
scuola elementare e secondaria pos 
siede almeno un computer, ogni stu- 
dente può usarlo mediamente solo per 
15 minuti alla settimana. 

Certo molti ragazzi e molti adulti vor- 
rebbero imparare di più sui computer, 
ma come possono farlo? 

Possono Iniziare leggendo riviste e li- 
bri. Ragazzi ed adulti possono diventa- 
re esperti di computer leggendo i molti 
ed eccellenti testi per principianti or- 
mai notevolmente diffusi, ed il i bri e le 
riviste specializzate possono rendere 
più produttivo ed eccitante il tempo 
speso dal principiante sul suo compu- 
ter. 

L'etica del computer 

I libri e l'altro materiale stampalo pos- 
sono Inoltre insegnare alla gente come 
usare II proprio computer In modo 
onesto, la letteratura informatica tan 
le volte si occupa esclusivamente di 
questioni puramente tecniche, come 
ad esempio la programmazione BA- 
SIC, e poca attenzione è dedicata a 
mettere in guardia i lettori dagli aspetti 
negativi del computer, quali la pirate- 
ria software, l'alienazione da computer 
ed II crimine computerizzato. 

Una librarla software 

Molti editori stanno creando una sezio- 
ne dei loro cataloghi dedicata ai com- 
puter ed I robot, comprendente mate- 
riale su robotica, programmazione, let- 
teratura software ed hardware. 

In particolare stiamo assistendo al fe- 
nomeno della nascita delle prime libre- 
rie software: ragazzi ed adulti possono 
scegliere e provare il software deside- 
rato In libreria o a cosa propria; Inse- 
gnianti si possono facilmente procura 
re in questo modo del software didatti- 
co per I propri allievi. Per il momento, 
almeno in Italia, il software viene ven- 
duto direttamente In libreria o tramite 
li servizio postale. Ma non è lontano ìl 
momento in cui anche da noi si potrà, 
previa iscrizione ad un club editoriale, 
ricevere del software in tempo reale di- 
rettamente sul proprio computer via 
modem. 

Familiarità con II computar 

Molti desiderano diventare esperti di 
computer, ma prima di tutto é neces 
sario acquistare la dovuta familiarità 
con la macchina. Per raggiungere que- 
sto scopo non è richiesto sapere come 

II computer funzioni nel suo interno, 
ma solo essere in grado di farlo funiio 
nare In ogni situazione. Bisogna essere 
calmi e rilassati nei suoi confronti e sa 
perla usare disinvoltamente per il lavo- 


ro, studio o divertimento. 

Quasi mai e + è il tempo per dare ad un 
ragazzo familiarità con La macchina 
durante il periodo scolastico: cl sono 
troppi studenti e troppo pochi calcola- 
tori. Mentre per quanto concerne gli 
adulti, essi sono quasi sempre troppo 
timorosi e sconcertati nei confronti dei 
computer per poter entrare con tran- 
quillità in un negozio ed acquistarne 
uno. 

In particolare, la prima esperienza che 
molte persone hanno con il calcolatore 
è tipicamente frustrante; o cl si aspetta 
dì essere immediatamente In grado di 
farlo funzionare con successo al primo 
tentativo, o ci si assoggetta ad aridi e 
sintetici manuali per imparare codici 
dì istruzione e parole chiave, che dopo 
poco tempo fanno scemare tutto 11 no- 
stro interesse per l'Informatica, 

Molti usano per la prima volta 11 calco- 
latore a scuola o sul lavoro, cosicché 
devono apprendere nozioni comunque 
serie e relative ad un'applicazione pro- 
ficua del sistema. 

Disponendo invece di software fornito 
da una librerìa, é più facile spendere il 
proprio tempo imparando proprio le 
cose che si volevano imparare. GII edi- 
tori di software devono disporre di pro- 
grammi che siano atrattivi, intelligen- 
ti, di facile e divertente uso, che ragaz- 
zi ed adulti possono usare per hobby, 
lavoro, auto- istruzione ed in generale 
per personale arrichimento Intellettua- 
le. Sì è detto prima che I computer rap- 
presentano la porta e la finestra per le 
informazioni: il compito della libreria 
software è quello di mantenerle aperte 
cosicché tutto ciò che è archiviato in 
forma elettronica sia disponibile per 
tutti 
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come iniziare 



N egli Stati Uniti, notoriamente pre* 
cursori di quanto avverrà da noi nei 
prossimi anni* un numero sempre 
maggiore di utenti usa Sì proprio perso- 
nal computer per comunicare con si- 
stemi di informazione» computer 
‘ mainframe", ed altri personal compu 
ter. Tutto lascia pensare che tra non 
molto questo fenomeno si estenderà 
anche in Italia, e quindi perché non da- 
re un occhiate a ciò che è necessario 
per le telecomunicazioni? 

Quali apparecchiature hardware sono 
richieste? E quale software? Eccone 
una panoramica. 


Nelle telecomunicazioni, le informa* 
zlonì Inviate da un computer ad un al- 
tro viaggiano attraverso le linee telefo- 
niche. Benché questo sìa LI sistema più 
efficiente per ora disponibile, c‘è un 
problema: i telefoni ed i computer so- 
no basati su differenti tecnologie. I si* 
sterni telefonici in genere sono proget- 
tati per filtrare, e quindi eliminare dal- 
la linea, I rumori che vengono emessi 
dai calco latori, in quanto questi ultimi 
vengono interpretati dalle apparec* 
eh Sature telefoniche come segnali di 
disturbo. 

Ecco perché è necessario un MODEM 


(MOd u I at o re ■ DEModu I atore y q ue sto 
apparato modula I segnali digitali del 
computer in segnali analogici, in mo- 
do che la linea telefonica possa tra- 
smetterli. Il computer ricevente sarà 
dotato di un altro MODEM che ricon- 
vertirà i segnali da analogico a digitale 
e li invierà quindi al calcolatore. Fon- 
damentalmente il MODEM ha le fun- 
zioni dì traduttore di segnali. Esistono 
due tipi di MODEM usati comunemen- 
te con i personal computer: 

I MODEM ACUSTICI sono caratterizza- 
ti esternamente da due "cuffie" di 


sureavKi' 2*4 15 


Telecomunicazioni 
come iniziare 


gomma sulle quali sì appoggia la cor- 
netta telefonica: una cuffia contiene 
l'altoparlante che genera l suoni audio 
mentre l'altra contiene ii microfono 
che riceve I segnali dall'altro MODEM. 

I MODEM A CONNESSIONE DIRET- 
TA sono collegati direttamente allap- 
parecchio telefonico attraverso un ca- 
vo* Alcuni, come II VICmodem* sono 
cartridges che si col legano direttameli 
te ad una porta di input/output del 
computer, mentre altri sono unità se- 
parate di pìccole dimensioni col legate 
al computer ed al telefono attraverso 
cavi elettrici* 

Alcuni di questi ultimi posseggono ap- 
positi Interruttori che permettono di 
passare dal funzionamento del telefo- 
no In "modo computer” al "modo n or- 
male", cosicché se volete telefonare al- 
la ragazza vi basta girare un Interrutto- 
re invece di dover staccare una molti- 
tudine di cavi. 

I modem acustici sono in generale più 
economici, mentre quelli a connessio- 
ne diretta offrono una maggiore affida- 
bilità, essendo le frequenze sonore ge- 
nerate direttamente sulla linea telefo- 
nica* Un modem acustico è sensibile al 
rumori "estranei" prodotti nella stanza 
In cui lo si usa, rumori che possono In- 
terferire nella comunicazione se le cuf- 
fie non sono perfettamente adattate al- 
la forma della cornetta. 

TermlEitll 'stupidi ' 

Se trasformiamo II nostro personal 
computer In un terminale usando un 
modem, come può In pratica trasmet- 
tere dati ad un altro terminale in un al- 
tro quartiere o in un altro continente? 

II computer deve essere messo In gra- 
do di Interpretare I bit ricevuti nel mo- 
do corretto* altrimenti si otterrebbero 
cose prive di alcun significato, È quhv 
do necessario dell'apposito software 
per telecomunicazioni* sfa sotto forma 
di cartridge, che su disco o su cassetta. 
Inoltre* un modem deve essere settato 
nel modo corretto nei confronti dell'al- 
tro modem affinché la trasmissione di 
dati sia possibile. I modem possono es- 
sere settati in diverse maniere: 

Il numero di BADO è 11 numero di bit 
trasmessi al secondo* Questo può va- 
riare generalmente da 110, valore tipi- 
co delle vecchie telescriventi* fino a 
9600* 

Più alto sarà il valore 8AUD, più bassa 
in conseguenza sarà la vostra bolletta 
telefonica* 

Comunque* trasmettere informazioni a 
9600 BACÒ significa mettere a dura 
prova la qualità e l'affidabilità delle li- 
nee telefoniche che. come tutti ben 
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sappiamo, in Italia sono piuttosto pre- 
carie, Per stabilire un canale di comu- 
nicazione con un altro modem, occor- 
re conoscere il numero di BAUD sul 
quale quest'ultimo è settato In modo 
da settore il proprio in modo analogo. 
Un altro parametro è II DUPLEXING: 
FULL DUPLEX significa poter trasmet- 
tere e ricevere dati allo stesso tempo: 
HALF DUPLEX significa invece com- 
piere queste operazioni una alla volta. 
Se questo parametro non è settato cor- 
rettamente in relazione all'altro mo- 
dem* può capitare di vedere sul video 
tutti i caratteri duplicati* oppure di non 
vedere assolutamente nulla. 

Alcuni tipi di software per telecomuni- 
cazioni permettono di trasmettere e ri- 
cevere programmi: ponete II caso di 
avere un amico In un'altra città, o addi- 
rittura in un altro Stato, che abbia pro- 
grammato un gioco fantastico e non 
possegga una stampante per sped irvi il 
listato; se avete lo stesso tipo dì com- 
puter, un modem ed un appropriato 
software, quel programma potrà esse- 
re direttamente trasmesso sul vostro 
calcolatore. Ciò che voi riceverete sarà 
una sequenza di codici ASCII (numeri 
che rappresentano ogni possibile ca- 
rattere di un computer); ogni carattere 
sarà ricevuto separatamente e caricato 
In memoria. 

I servizi di telecomunicazione 

Ora una panoramica sui principali ser- 
vizi che si possono ottenere nel Norda 
m erica (prossimamente speriamo an- 
che sul nostri schermi) ed in Italia. 

— Servizi di notizie ed informazioni: 1 
principali network sono "CompuServe" 
e "The Source". Una volta abbonati a 
questi servizi si forma il numero telefo- 
nico. si batte sul computer la propria 
sigla segreta di identificazione, e di ot- 
tengono immediatamente tutti i tipi di 
informazione fomiti - notizie* sport 
quotazioni di borsa, etc. Si può avere 
una propria "casella postale elettroni- 
ca" In modo che possano essere lascia- 
ti messaggi per voi da altri abbonati. 
Inoltre, CompuServe ofFre la versione 
"informatica" della ricetrasmittente 
CB: si può entrare direttamente In co- 
municazione via computer con altri 
abbonati tramite il sistema centrale. 

— Servìzi di teleconferenza: oltre ad 
offrire I principali servizi degli altri net- 
work di telecomunicazioni, questi ulti- 
mi rendono possibile avere riunioni di 
lavoro o di svago con altre persone co- 
modamente seduti a casa propria da 
vanti al computer, 

— Servizi disponibili in Italia: ancora 
in fase sperimentale, il VIDEOTEL del 
La SIP permette di accedere Interattiva- 


mente ad una serie di informazioni tra- 
mite un televisore oppurta riamente 
adattato od un terminale dotato di 
software apposito. 

In sperimentazione dal 29.11.1982 
con un campione di circe 1000 utenti, 
dovrebbe diventare esecutivo entro 
l'anno. 

In ogni caso, per chi disponesse di un 
modem e volesse fare degli esperimen- 
ti, è possibile collegarsi con gli Stati 
Uniti tramite 11 servizio ITALCABLE di 
trasmissione dati DARDO che accede 
alla rete americana TELENET. Per in- 
formazioni, Il numero della ITALCA- 
BLE é 11 170. Nel riquadro gli Indirizzi 
ed I numeri telefonici del principali 
network americani * 



Un esempio di modem a connessione 
diretta 


CompuServe 

5000 Arlington Centra Boulevard 
P«0, box 20212 
Columbus, OH 43220 
Telef. 614-4578650 


Dow Jones Information Services 
P.O. box 300 
Princeton* NJ 08540 
Teief. 609-452 1511 

The Source 
1616 Anderson Roed 
McLean, VA 22102 
Telef. 703-7347500 

Telenet (GTE Communications) 
8229 Eoo ne Boulevard 
Vienna, VA 22100 
Telef. 703-4422200 


Piccola guida per 
l’input 

dei programmi 


» olii del programmi listati da 8(1 PERVIO conterv 
1*1 gono particolari caratteri di controllo (controllo 
cursore» tasti colore, video- Inverse, etc.)- 
Per rendere chiaro ciò che dev'essere battuto quando 
è necessario Inserire uno del suddetti caratteri sono 
state stabilite le seguenti convenzioni. 
Generalmente I listati per VIC 20 e C64 contengono 
delle «parolei racchiuse tra parentesi graffe ( F tal! 
parole rappresentano particolari caratteri di control- 
lo: (GIÙ) significa premere II simbolo del cursore ver- 
so li basso. (5 SPAZI] vuol dire battere 5 volte la 
barra-spazio. 

Per indicare che un tasto dev essere «shlftato», cioè 
premuto insieme al tasto SHIFT, nel listato 11 simbo- 
lo di quel tasto sarà sottolineato. 

Per esemplo £ significa che dev'essere premuto 11 ta- 
sto S mentre è abbassato 11 tasto SHIFT. 

La manovra farà apparire sullo schermo un piccolo 


«cuore!. 

Trovando un simbolo sottolineato chiuso tra paren- 
tesi graffe (esemplo {10 PJ}) dovrà essere interpretato 
come «premere II carattere indicato per lì numero di 
volte che lo precede nelle parentesi* nel nostro 
esemplo premere 10 volte il tasto IH «shiftato». 

Se II tasto da premere è Indicato tra le parentesi [{ }] 
vuol dire che lo stesso dovrà essere premuto mentre 
è premuto II tasto «Commodore» (Il tasto «Commo- 
dore» è quello posto nei [‘angolo in basso a sinistra). 
Se II tasto scritto tra ({ )| è preceduto da un numero, 
ciò significa che il tasto dev'essere premuto per LI nu- 
mero di volte Indicato. 


Raramente si potrà trovare un carattere alfabetico so- 
litario racchiuso tra parentesi graffe. Tale carattere 
sul C64 può essere battuto mentre è premuto 11 tasto 
CTRL 

Ad esemplo {A} sta ad Indicare la sequenza CTEL-A, 
A proposito del «modo virgolette» è nota la possibili- 
tà di muovere II cursore sullo schermo con I tasti 
CRSR. Ogni tanto I programmatori desiderano muo- 
vere Il cursore durante l'esecuzione del programma. 
È per questo motivo che nei programmi si troveran- 
no del {SIN!. (HOME) e (BLU). 

L'unico modo perché IL calcolatore distingua 11 co- 
mando diretto da quello Inserito nel programma è il 
■modo virgolette». Premendo 11 tasto «virgolette» (ta- 
sti SHIFT 2) Il calcolatore si predispone appunto in 
«modo virgolette». 

Battendo un carattere qualsiasi cercando poi di cor- 
reggerlo muovendo II cursore a sinistra, si otterrà so- 
lo un tratto verticale In un quadratino inverso. Que- 
sto è Infatti 11 simbolo dei cursore a sinistra nel «mo- 
do virgolette». 

L'unico comando di editing non utilizzabile all'inter- 
no di un programma è 11 DEL Battendo nuovamente 
le «virgolette» il calcolatore lascia il «modo virgolet- 
te». SI può accedere al «modo virgolette! quando In- 
serite spazi nella linea. 

in ogni caso, 1) sistema più semplice per uscire dal 
«modo virgolette» è quello di premere il tasto RE 
TURM. 

Utilizzare la tabella che segue quando è necessario 
inserire comandi relativi al cursore e al tasti colore. 


Qouido 1 «Affate: 

Premete: Vedrete: 

Quaiide leggete: 

Premete: 

Vedrete: 


i leggete: Premete: 

Vedrete: 

{CLR) 

QJQ lilillLlU 

G 

iCVM) 

DBD 

m 

t<7>] 

□n 

□ 

(HOMB] 


m 

(POR) * 

Emo 

a 

1<8>1 

BD 

mm 

■a 

{SU} - 


□ 

(CRN) 

ama iaa 

□ 

(rii 

m 


{GIU' ) 

MSB 

E 

{ BLU } 

GERII 

□ 

{F2J 

KB 


{SIK } 

mi S29B 

II 

(Y1LÌ 

■ ALre , 

IO 

{F3} 

■aa 


(OES } 


O 

|<1>) 

am 

□ 

( F4 ) 

t 

a 

{ RVS } 

sa o 

E 

«2» 

BEI 

a 

<FS} 

i m 

ii 

{OFF } 

CESO 

a 

C<3>) 

am 

a 

{F6 } 

m 

a 

( BLK } 

omo 

m 

f<4>| 

BO 

E 

{F7> 

KB 

a 

(WHT) 

EBREI 

m 

1<S>] 

BO 

a 

{ F8 J 

OD 


(RED) 

EBRD 

u 

«6>I 

BD 

a 
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I nserite in memorie fOK-LJST prime 
di accingervi a battere i listati pubbli- 
cati; avrete a disposi! ione un formida- 
bile metto per essere sicuri di aver in- 
serito nel computer ogni carattere In 
modo assolutamente corretto* 

Tutti I nostri listati sono caratterizzati 
da un numero aggiunto ad ogni linea 
di programma* ad esempio: rem 123* 
NON COPIATE QUESTA PARTE DEL- 
LA LINEA! Serve unicamente per vo- 
stra Informazione, L'istruzione REM he 
l'unico scopo di renderla inoffensiva se 
per errore doveste batteria. 

Se, prima di Iniziare II lavoro di battitu- 
ra del listato, caricate in memoria OK- 
UST e lo attivate con SYS 806. per 
ogni linea che battete verri visualizza- 
to un numero (detto di checksum) 
nell'angolo superiore sinistro dello 
schermo. 

Confrontate questo numero con quello 
pubblicato per ogni linea del listato; se 
non corrisponde, dò significa che ave- 


OK-List 
per la 
battitura 
dei listati 


te commesso un errore nella battitura 
della linea stessa. 

Le ore buttate per cercare e correggere 
errori di batttura in programmi che 
non funzionano saranno solo un lonta- 
no ricordo! 

Due ultime cose di cui tenere conto: 
OK-LIST non tiene conto degli spazi: 
questo per vostra convenienza, poiché 
questi generalmente sono poco Impor- 
tanti* 

Infine* OK-LIST è allocato nel buffer 
del registratore (iocaiioni 006-1010). 
quindi prima di salvare su cassetta II 
programma che state battendo, ricor- 
datevi di disabilitarlo premendo con- 
temporaneamente RU N/STOP + RE- 
SI" ORE. Potrete poi riattivarlo con 
SYS 086* 

Il sistema più comodo per usare OK- 
11ST è quello di battere normalmente 
il programma, quindi listarlo e portarsi 
con il cursore sul numero di linea più 
basso che appare sui video; premere 
quindi RETURN e confrontare il nume- 
ro di checksum visualizzato nell'ango- 
lo superiore sinistro del video con 
quello pubblicalo per le data riga del 
programma. Il cursore si porterà auto- 
maticamente sulla linea successiva, e 
non dovrete fare altro che premere 
nuovamente RETURN per ottenere il 
checksum seguente* 


OK-LIST 
versione 
por VIC 20 
o C 64 


100 PRINT" {CLR) ATTENDERE PREGO..." 

105 TORI -B86TO1018: READ*: CK-CK+A: PORRI, A: 

HSXT 

Ilo IF CK017539 THEN PRI NT" { GIO ' } ERRORE 
MELLE ISTRUZIONI DATA": END 
120 SYS886:FRINT" (CLR) { 2 GIU' lOE-tlST AT 
TIVATO. ":MEW 

086 DATA 173,036,003,201,150,208 
892 DATA 001,096,141,151,003,173 
898 DATA 037,003,141,152,003,169 
904 DATA 150,141,036,003,169,003 
910 DATA 141,037,003,169,000,133 
916 DATA 254,096,032,087,241,133 
922 DATA 251,134,252,132,253,008 
928 DATA 201,013,240,017,201,032 
934 DATA 240,005,024,101,234,133 
940 DATA 254,165,251,166,252,164 
946 DATA 253,040,096,169,013,032 
952 DATA 210,255,165,214,141,251 
958 DATA 003,206,251,003,169,000 
964 DATA 133,216,169,019,032,210 
970 DATA 255,169,018,032,210,255 
976 DATA 169,058,032,210,255,166 
982 DATA 254,169,000,133,254,172 
988 DATA 151,003,192,087,208,006 
994 DATA 032,205,189,076,235,003 
1000 DATA 032,205,221,169,032,032 
1006 DATA 210,255,032,210,255,173 
1012 DATA 251,003,133,214,076,173 
1018 DATA 003 
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trad. ed adott, dì F, Steli* 
e M, Crlitulb Grlzzl 


MLX è una utility che, contentan- 
do II caricamento di programmi In 
linguaggio macchina praticamente 
esenti da errori, risparmia tempo e 
lavoro a chiunque voglia godersi I 
giochi senza 11 fastidio di noiosi 
preliminari. 

S e avete mai digitato un lungo pro- 
gramma In linguaggio macchina, 
sarete ben cose lenti delle innumerevo- 
li Istruzioni DATA seguite da lunghe 
code di numeri alternati a virgole e del 
fatto che mai si è sicuri del l'esattezza 
della copiatura. Cosi alla fine è sempre 
necessario tornare indietro, spuntare 
ogni numero, salvare il programma 
( attenzione ai "black-out" del LM), lan- 
ciarlo, accorgersi che non va e ripetere 
Il ciclo più volte col rischio di rimanere 
comunque frustrati, o no? 

Sino ad ora comunque questo era li 
miglior modo di caricare programmi 
in LM In un computer: se non si possie- 
de un assembler e non si ha la voglia di 
districarsi nella programmazione a li- 
vello assembly, è molto più Facile digi- 
tare un programma BASIC che legga 
per mezzo di Istruzioni DATA I numeri 
inserendoli In memoria con POKE 
adeguate. 

Alcuni di questi "loaders", cosi sono 
conosciuti, controllano le serie di mi* 
meri digitati con un checksum. t più 
semplici sommano tutti 1 numeri del 
programma, taluni raggruppano dieci 
linee o meno; MLX utilizza una specia- 
le lista e II controlla riga per riga, Im- 
pedisce Inoltre di caricare caratteri 
non previsti (lettere al posto di numeri, 
ad esemplo), oppure numeri superiori 
a 255 (che non sono ammessi dal LM). 
MLX arriva persino ad Impedire l'Im- 
missione di numeri su righe sbagliate: 
In breve MLX farà diventare obsoleta 
ogni tecnica di controllo e verifica. Per 
di più MLX genera un file di uso Imme- 
diato su nastro o disco; sarà possibile 
usare il comando LOAD per leggere II 
programma nel computer. 

Più precisamente bisognerà digitare: 
LOAD "nome programma". 1,1 (na- 
stro) 

LOAD “nome programma", B,i (flop- 
py> 


Per lanciare il programma si userà II 
comando SYS che trasferisce il con- 
trollo dal BASIC al LM. Per prepararsi 
a caricare tutti I programmi che ver- 
ranno poi pubblicati In queste pagine, 
occorre digitare il listato di MLX facen- 
do attenzione a non fare errori (pur- 
troppo non è In grado di correggere 
anche se stesso). L'uso finale è sempli- 
ce; lanciando MLX verranno richiesti 
due numeri: l'Indirizzo di partenza e 
l'indirizzo di fine; questi numeri, indi- 
spensabili, si troveranno nell 'artico lo 
insieme a quello da indicare nella SYS, 
che sarà sempre indicato nell'articolo 
che accompagna II programma In LM. 
Per prepararsi a caricare tutti i pro- 
grammi che verranno poi pubblicati in 
queste pagine, occorre digitare il lista- 
to di MLX facendo attenzione a non fa- 
re errori (purtroppo non è in grado di 
correggere anche se stesso). 

Ad esempio nell'alticcio "DEMONI DI 
OSIRIS ' (versione C64) quest* indiriz- 
zi sono 49152 (start), 51005 (end): 
digitati questi subito dopo apparirà LI 
primo numero di linea seguito dal se- 
gno due punti e da un cursore fisso; a 
questo punto il programma si aspetta 
sei numeri più la somma di verifica; se 
uno del numeri. Le riga o la stesso 
"checksum" sono sbagliati LI computer 
io segnalerà con un suono sordo e Invi- 
terà a ripetere Le linea errata, se, invece 
tutto sarà corretto un piacevole suono 
di campanello accompagnerà U pas- 
saggio alla riga seguente. 

MLX non usa 11 normale 'screen editor" 
del computer, accetta solo Input nu- 
merici; se sì rende necessario una cor- 
rezione nell'ambito della riga su cui si 
sta lavorando, II tasto INST/DEL è sta- 
to pred Sposto a cancellare l'intero nu- 
mero e può essere ripetuto sino al prin- 
cipio della riga. 

Ogni tre cifre digitate, H programma 
provvede a stampare una virgola e si 
dispone ad accettare il numero succes- 
sivo; a questo scopo i listati sono com- 
posti da numeri di tre cifre; omettendo 
gli zeri non significativi sarà necessa- 
rio Invece premere RETURN, la virgola 
oppure La barra spaziatrice per passare 
al numero successivo. La somma di ve- 
rifica appare automaticamente in "re- 


verse"; cosa che non Influenza lo svol- 
gimento de 11 ‘operazione, ma crea un 
effetto estetico di completezza. 

Nella fase di sperimentazione si è tro- 
vato che anche II caricamento di lun- 
ghi listlng diventa molto più semplice 
e veloce; avendo a disposizione una 
cuffia audio e conoscendo bene la ta- 
stiera, si potrebbe persino fare a meno 
del televisore; In ogni caso neanche le 
persone più Inesperte sono mal riusci- 
te a commettere errori nel test di MLX. 
Una volta caricato In memoria 11 Listlng 
In LM, si dovrà registrarlo su nastro o 
disco seguendo le Istruzioni Illustrate 
sullo schermo. Se II sistema operativo 
trova errori nella Fase di SAVE, verifi- 
care Innanzitutto la periferica interes- 
sata (attenzione a: fine nastro, disco 
pieno, ecc. ) poi rivedere il programma 
MLX (ricordarsi che non può verificare 
se stesso). Se si vuole digitare il listato 
in più fasi, MLX permette di salvare la 
parte completata e caricarla In memo- 
ria per continuare quando e quante 
volte sia necessario. 

MLX riconosce i seguenti comandi 
speciali: 

SHIFT + S - SAVE 
SHEFT + L - LOAD 
SHIFT + N » nuovo indirizzo 
SHIFT -*-D - display 

ogni volta che si preme una di queste 
combinazioni di tasti (mantenendo 
SHIFT premuto) si esce dalla riga in 
corso di scrittura, pertanto è consiglio- 
bile eseguire I comandi a principio di 
riga. Si usa Save per conservare dò 
che si t realizzato sino a quel momen- 
to. l'Istruzione opererà come di solito 
sulla periferica prescelta; Il program- 
ma non sarà però eseguibile fino al suo 
completamento. È Importante, in ceso 
di spezzettamento dei lavoro in più 
parti, ricordare l'Indirizzo « cui si era 
terminata lo parte precedente (pren- 
derne nota). Alla ripresa occorrerà lan- 
ciare MLX, rispondere alla prima fase 
con gli stessi Indirizzi dì start e end 
poi, dopo il numero della prima riga 
usare II comando Load per caricare la 
parte precedentemente memorizzata: 
a questo punto per riprendere II lavoro 
Inserire, per mezzo del comando 
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SHÈFT + IH* rindiriiio che d si era an- 
notali; è indispensabile usare sempre 
un Indi ritto tra quelli che Fanno da ca- 
poverso nd listato altrimenti ['automa- 
tismo di verìfica segnalerà un errore di 
somma. Il comando Display corrispon- 
de a LIST, Infatti seguito da due Indi* 
ritti nella gamma dichiarata esegue 
una lista del valori contenuti nelle lo- 
cazioni richiamate; questa routine si 
Interrompe premendo un qualsiasi ta- 
sto. 

Chiesti comandi speciali possono ap- 
parire poco utilizzabili ad una prima 
lettura ma aprono questo programma 
che diventa uno dei tool (attrezzi) a di- 
sposizione e come tate deve prevedere 


le varie possi bl liti dì lavoro; come 
comportarsi ad esemplo ie alla ripresa 
di un lavoro ci si accorge di aver di- 
menticato lindi ri zzo da cui partire? 
Con II comando Display sari facile cer- 
care dove l] listato si interrompe e ri- 
partire. E comandi Load e Save sono In- 
dispensabili per fare più copie dei pro- 
gramma completato e provato, cosa 
altrimenti non realizzabile con l meto- 
di usuali. 

A causa di un piccolo inconveniente 
nella routine di SA VE* durante II 
LOAD* la scritta FOGNO "nome pro- 
gramma" può apparire più volte di se- 
guito* ma questo non influenza II rego- 
lare caricamento. 


Molto interessante è l'uso delle routine 
del KERNAL di SAVE e LOAD a cui si 
ha accesso con LI comando SYS dopo 
aver caricato I due Indirizzi di partenza 
e fine locazioni 251/252 (lowbyte/hlg 
byte) e 254/255 rispettivamente; even- 
tuali errori vengono rilevati e posti nel- 
la locazione 253 sotto forma di un nu- 
mero Inferiore a 10. 

Spero di avere proposto con MLX una 
utility che faccia realmente risparmia- 
re tempo e fatica Incoraggiando ruti- 
lino dei programmi In LM pubblicati e 
permettendo di goderne la qualità. 
Ricordatevi di registrare più copie di 
MLX.: vi sarà certo utile per l numerosi 
programmi* di prossima elaborazione. 


MLX per C64 

100 PRINT" (CLR) ( RED} * ; CHBS ( 142 ) ;CHR6(8} 
POKS53281 , 1: POKE53280, 1 tran 198 

101 POKE78 8 i 52 : REM DISABLE RUN/STOP 

irata 119 

110 PRINT" {RVS 1 { 40 SPAZI ) "f treni 176 
120 PRINT" {RVS}{ 15 SPAZI ) (DBS } {OFF) [<*>] 
£{RVS){DES) (DES){ 2 SPAZI) [<*>) {OFF} 
I<*>)£{RVS)£{RVS){ 13 SPAZI)"; 

iran 250 

130 PRINT" {RVS) { 15 SPAZI) {DBS) [<N>) [<K>) 
(DES) { 2 DBS) {OFF)£{RVS)E{<*>J (OFF) 
{<*>) (RVS) ( 13 SPAZlT"; ” ire» 220 
140 PRINT" { RVS H 40 SPAZI}" :ren 120 

ISO V-53248iPOKE2040,13:POKE2041,13:FORI- 
S32T0894 iPOKEX ,2S5sNEXTt POKEV+27, 3 

: rem 223 

160 POKEV+21, 3 tPOKEV+39 , 2 :POKEV+40, 2t POKE 
V, 144 : POKEV+1 , 54 : POKEV+2, 192 : POKEV+ 3 , 
54 tram 51 

170 POKEV+29, 3 tram 18 

180 POR I - OTO 2 3 : READ A : POKE67 9+ 1 , A : POKEV+ 39 
, A i POXEV+ 4 0 1 A : NE XT tram 188 

185 DATAI 69, 251, 166(254.164,255,32,216,25 

5.133.253.96 :rem 125 

187 DATA169, 0,166, 251, 164, 252, 32, 213, 255, 

133.253.96 : rem 14 

190 POKEV+39,7 :POKBV+40, 7 ;r« 202 

200 'PRINT" { 2 GIO'HPDR) UN PROGRAMMA 

( 3 SPAZI ) PER { 3 SPAZI } L ' INTRODUZIONE 
DI { 2 SPAZI } ROUTINE IN LINGUAGGIO"; 

:ren 217 

205 PRINT" MACCHINA A PROVA{ 17 SPAZI }DI 
{ 2 SPAZ I ) ERRORE ( 3 GIU'}" tram 244 

210 PRINT" [<5>]{ 2 SU) INDIRIZZO DI PARTE 
NZA{ 2 SPAZI}"; : INPUTS : F-l-F :C$-CHR$ ( 
31+119*0 . ira» 85 

220 1FS<2560R (S>40960ANDS< 49152 )ORS>S3247 
THENGOSUB3000 :GOTO210 : rem 235 

225 PRINT" { 29 SPAZ I ) " : PRINT : PRINT 

tram 248 

230 PRINT" ( < 5> ] { 2 SU) INDIRIZZO CONCLUSI 
VO { 3 SPAZ I ) " ; : I NPUTE : F* 1-F : CS-CHRS ( 3 
l+119*F) : rem 92 

240 IFE<2560R<E>40960ANDE< 49152 }ORE>53247 
THENGOSUB 3 00 0 :GOTO230 : rem 183 

250 IFE<STHENPRINTC$;"(RVS){ 2 SPAZlllNDI 
RIZZO CONCLUSI VO< INDI RI ZZO FINALE" 




s rem 

34 

255 

XFE<STHENGOSUBlOOO : GOTO 2 30 

irem 

119 

260 

PRINT: PRINT SPRINT 

: rem 

179 


300 PRINT" (CLR) ";CHR$ (14) :AD-Ss POKEV+2 1, 0 

tram 225 


310 PRINTRIGHT8 ("0000"+M1D$ (STR$(AD) ,2) ,5 
(FORJ-1T06 tram 234 

320 GOSUB570: IFN"-lTHENJ"J+N:GOTO320 

tra» 228 

390 IFN--211THEN710 tre» 62 

400 IFN--204THBN790 tra» 64 

410 IPN"-206TKENFRINT: INPUT" {GIU' } INSERÌ 
RE IL NUOVO INDIRIZZO"; ZZ tra» 13 

415 IFN--276THENIFZZ<SORZZ>ETHENPRINT" 

(RVS) ESCE DAL CAMPO DI VALORI INDICA 
TO - ira» 106 

416 IFN--206AND<ZZ<SORZZ>E)THSNGOSUB1000i 

goto 410 tra» 49 

417 IFN B -206THENAD a ZS: PRINT :GOTO310 

tra» 238 

420 IFNO-196THEN480 tra» 133 

430 PRINT! INPUT" LISTATO t DA* ;F: PRINT" 

{ 12 SPAZIlA”; tlHPUTT tra» 183 

440 I PP<S0RF>E0RT<50RT>ETOENPRINT" ( GRN } M 
INIMO" ; S)"{SIN} MASS IMO" ; E; * l [<5 >]"Tg 



OTO430 

: rem 

78 

450 

PORI «FTOTSTBP 6 : PRI HT : PRINTRIGHT8 l * 

'000 


0-+MIDS (STR$ (I) ,2) ,5) 

; rem 

30 

451 

FORK-0TO5iN-PEEK(I+K) : PRINTRIGHT8 ( 

[*00 


W +MID$ ( STR$ (N) , 2 ) ,3) 

"f :rem 

66 

460 

GETA$ ; I FA$ > " "THBNPRINT : 

PRINT :GOTO310L 


IST310 

: rem 

233 

470 

NEXTK : PRI NTCHR$ (20) ; tNBXTI : FRIHTi PRIH 


T:GOTO3L0 

: re» 

50 

480 

IFH< 0THERPRINT :GOTO310 

: re» 

168 

490 

A ( JJ -H:KEXTJ 

: rem 

199 

500 

CKSUM- AD- INT (AD/256) *256 : FORI "1T06 :CK 


SUM-(CKSUM+A(I) )AKD255: 

NEXT tre» 

200 

510 

PRIHTCHR$ (18) ; SGOSOB57Q 

tPRlNTCHR? (20) 



ire» 

234 

515 

IFN-CKSUMTHEN530 

: rem 

255 

520 

PRINT: PRINT" { RED ) LA LINEA E' STATA I 


NSERITA IH HAHIERàT<5>] 

* tre» 

53 

525 

PRINT" [RED] ERRATA. RI PETERE [ < 5> ] " 

:PR 


ItiTt GOSU&1000 :GOT03 1^ 

: rem 

55 

530 

GOSU62000 

: rem 

218 

540 

FORI «1T06 : POKEAD+ 1 - 1 , A ( I ) tNEXTt POKE54 


272,0: POKE54 27 3 , 0 

: r em 

227 

550 

AD "Ad +6 : 1 F AD< ETHEN 3 1 0 

: re» 

212 

560 

GOTO710 

: rea 

108 

570 

lt-OlE-O 

: re» 

88 

580 

PRIHT" ( < X > ] * ; 

: re» 

79 

581 

GETA8 : 1 FA8 " " "THEN5 81 

tre» 

95 

585 

PRXNTCHR8 (20) ? ;A-ASC £À$) ! IFA-130RA 

"44 


ORA" 3 2THEN6 7 0 

tre» 

229 

590 

I FA> l 2 8THENH- - A : RETURH 

tre» 

137 

600 

I FA < > 2 0THEN 630 

tre» 

10 


610 GOSUB690 I IFI “ lANDT“44THENN“- 1 I PRINT" 
(SIN) {SIN)"; IGOTO690 tra» 172 
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PRINTA8; SN"N* 10+A-4B 

: rem 

106 

GOTO 570 

:rem 

109 

630 

IFA< 48QRA> 57THEN5B0 

: rem 

105 

650 

IFN>255THENA"20 : GOSUBlOOO : 

GOTO60Q 

: rem 

229 

660 

Z«Z+1 : IFZ< 3THBN580 

: rem 

71 

670 

IFZ-OTHBNGOSUBIOOO ! GOTO570 

: rem 

114 

680 

PRINT",*; : RETURN 

: rem 

240 

690 

St“P3EEK (209) +256*PBBK (210) +PBBK(211) 

: rem 149 

691 

FORI ■ ITO 3 3 T“PEEK ( S 1 * I ) 

: rem 

67 

695 

lFTO44ANDT<>58THENP0KES%- 

I ,32:NEXT 



: rem 

205 


700 PRINTLEFT8 [*{ 3 SIN} ", 1-1) RETURN 

: rem 7 

710 PRINT" {CLR} { RVS } *** SAVE *** 

f 3 GIU 1 }" “ :rem 236 

720 INPUT" {GIU 4 } NOME DEL FIL1"?F$ 

- ; rein 199 

730 PRINT : PRINT 14 { 2 GIU 1 } i RVS }N{OFF } ASTRO 
0 { RVS } D { OF F } ISCO : (N/D) " : rem 126 

740 GETA$ : I FA$ < > "N" AND A$ O "D n THBN 740 

: rem 30 

750 DV“ 1-7 * C A$ ""D" } : IFDV»8THENF$»"0 : "+FS 

;rem 158 

760 OPENl,DV,l,F9 :POKB2 52, S/256 :POKB251 f S 
- PEEK ( 252 } *256 :rem 137 

765 POKE255 , E/256 : POKE2 54 , E- PEEK (255} *256 

: rem 37 

770 PQKE253 , 10 : SYS679 iCLOSEl :rem 180 

775 IFFEEK(253) >90RPEBK ( 253) -0THBNPRINT" 
{GIU 1 } OPERAZIONE CONCLUSA. " : END 

: rem 251 

780 PRINT* { Gl U f } ERRORE DI REGISTRAZIONE. 

RIPROVA. w i IFDV-1THEN720 : rem 219 

781 OPENÌ5,6/15;INPUT|15,DS,DS$:PRINTDS;D 

S$ : CLOSE 1 5 : GOTD720 :rem 161 

790 PRINT 14 {CLRj {RVS}*** LO AD *** 

{ 2 GIU r ) " : r em 212 

800 INPUT" { 2 GIU 1 }NOME DEL FILE";F$ 

: r em 215 

810 PRINT: PRINT" { 2 GIU 4 } {RVS }N {OFF} ASTRO 
O { RVS } D { OFF } I SCO : fN/DJ * :rem 127 
820 GETA$ : IFA$O"N*AN0A$O "D"THEN820 

:rem 26 

830 DV* 1 - 7 * (A$-"D"J : IFDV-8THBNF$«*0: "+F$ 

:rem 157 

840 OPBNl ,DV, 0 , P$ : POKE252 , S/256 : POKE251 , S 
* PEEK (252) *256 :rem 135 

850 FOKE2 53 1 10 s SYS 691 i CLOSE I :rera 173 

860 IFPBEK (253) >90RPEEK (253) -OTHENPRINT : P 
RI NT : GOTO 310 : rem 92 

870 PRINTMGIU 4 }BRRORB DI CARICAMENTO. R 
IPROVA. { G I U 4 T" : I FDV» 1THEN800 : rem 13 

880 QPEN15 , 8 f 15 J INPUT# 1 5 # DS , OS? : PRINTDS; D 
S$ :CLOSBl 5 : GOTO 800 ?rem 160 

1000 REM BUZZER : rem 135 

1001 PQKB54296,15:POKE54277,45:POKE54278, 

165 srem 207 

1002 POKE54276 , 33 : PGKE54 273 , 6 : FOKE54 272 , 5 

: r em 42 

1003 FORT» 1TO200 : NEXT: PQKE54276 , 32 : PQKE54 

273, 0:POKES4272,0; RETURN :rem 202 

2000 REM CAMPANELLO ì rem 130 

2001 POKE54296 , 15 : POKE54 2 77 , 0 : POKE54273 , 2 

4 7 : rem 152 

2002 POKB54276 # 17 : POKE54273 r 40 : POKE54 272 # 

0 : rem 86 

2003 FORTUITO 100 : NEXT : POKE54 276 , 16 : RETURN 

; rem 57 

3000 PRINTC6 ; * {RVS } NON IN PAGINA ZERO O 
SU {DBS} ROM * : GOTOIOOO :rem 240 


A tutti i lettori 


Tutti 1 listati pubblicati sono 
stati ricavati direttamente da) 
computer dopo aver eseguito ed 
accuratamente testato II 
programma. Non contengono 
quindi né errori tipografici né 
errori che comunque 
impediscano la corretta 
esecuzione del programma 
stesso. VI preghiamo pertanto di 
prestare la massima attenzione 
nella copiatura e di non 
tempestare di telefonate la 
redazione. In quanto, ripetiamo, 
tutti 1 listati pubblicati sono 
corretti. Per eventuali errori 
tipografici riscontrati nel testo 
degli articoli (e quindi 
fotocomposti), verrà pubblicata 
una errata corrige sui numeri 
successivi della rivista. 


Data l’elevata quantità di 
richieste pervenuteci, 
abbiamo deciso In via del 
tutto eccezionale di 
rendere disponibile una 
cassetta contenente tutti I 
programmi apparsi sul 1 0 
numero di SuperVIC, al 
prezzo speciale di L. 
15.000+ L. 2.000 per 
spese di spedizione. Per 
l’ordinazione utilizzate 11 
coupon pubblicato a pag. 
66 di questo numero della 
rivista. 
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di G. Peele 
ir ad ed adatt. 

dì M. Cristuib Grizil 


k ovete difendere la vostra base or 
Umata di cannoni da susseguenti orv 
date di veloci attaccanti Osi riani che 
cercano di distruggervi. GII Osirianl 
non si muovono In modo prevedibile, 
ed anticipano le vostre mosse eversive 
per inseguirvi e colpirvi. Il programma 
è scritto per II VIC inespanso ed Inclu- 
de una versione per II C64. 

"DEMONI DI OSIRIS" è un veloce gio- 
co di stile "arcade", scritto I marameo» 
te in linguaggio macchina. Lo scopo 
del gioco è distruggere gii Osirianl che 
vi incalzano, mentre allo stesso tempo 
essi usano la propria Intelligenza per 
cercare di dltruggere voi. 

Potete scegliere tra 240 livelli di velo- 
cità, dove il livello 1 è il più veloce. 
Inoltre potete scegliere da 1 a 240 can- 
noncini in dotazione. Preparatevi a do- 
ver combattere contro almeno otto 
Osi riani alla volta. 

Il vostro cannoncino è situato nel pun- 
to più basso dello schermo, e potete 
controllare le sue funzioni come se- 
gue: 


Premete 
Premete 
Premete SHIi 


T per muovere a sinistra 
!f muovere a destra 
per sparare 


U pe i 
sHIFT 


Premendo il tasto SHIFT LOCK sarete 
dotati di fuoco continuo. Quando lo 
schermo lampeggia rapidamente In 
rosso, ciò significa che avete perso 
uno del vostri cannoncini. 

Gli Osirianl sono dotati di una strate- 
gia semplice ma efficace: hanno due ti- 
pi di comportamento: di difesa e di at- 
tacco. Quando si comportano In modo 
difensivo cercano di evitare ie vostre 
bordate oscillando a destra e sinistra, 
mentre In modo offensivo vi Inseguo- 
no nel vostri movimenti cercando di 
raggiungervi e finirvi. Non scenderan- 
no mal In linea retta perché ciò accre- 
scerebbe le loro probabilità di essere 
colpiti, ed Invece colpiranno voi quan- 
do si venissero a trovare nello spazio 
direttamente sopra o di fianco al vo- 
stro cannoncino. In particolari situa- 
zioni metteranno In azione una strate- 
gia difensiva consistente in azioni eva- 
sive intorno al vostri missili. 

Il migliore metodo di gioco consiste 


nel muoversi rapidamente ed allo stes- 
so tempo lanciare i propri missili. 

La parte In linguaggio macchina del 
programma occupa nel VIC 696 byte, 
mentre la parte In BASIC è lunga solo 
tre linee. La sezione In linguaggio 
macchina è sotto forma di valori DA- 
TA che vengono caricati in memoria 
con istruzioni POKE, L intero pro- 
gramma, comprese le linee DATA, oc- 
cupa tutta la memoria disponibile ne! 
VIC inespanso. Proprio a causa della li» 
mitata quantità di memoria disponibi- 
le, molte delle linee del programma 
sono più lunghe del normale; dovrete 
quindi ricorrere alla forma abbreviata 
nella battitura del listato (vedi la "PIC- 
COLA GUIDA ALL INPUT DEI PRO- 
GRAMMI' in altra parte della rivista). 
In particolare, sarà necessario abbre- 
viare l'Istruzione DATA con D-f SHIFT 
(A) nelle linee da 35 a 190. 

Dopo aver battuto il programma, sal- 
vatelo su nastro o su disco prima di da- 
re Il RtTN: un errore nelle istruzioni DA- 
TA può causare il blocco totale del 


computer con la necessità doverlo spe- 
gnere e riaccendere, perdendo irrime- 
diabilmente lutto il vostro lavoro. Ri- 
cordate inoltre di caricare In memoria, 
prima di battere il listato. Il nostro QK- 
U5T che vi eviterà un sacco di noie 
nel l'inserimento dì tutti 1 numeri delle 
DATA, Infine, un ultima avvertenza: a 
lavoro ultimato premete RUN/STOP + 
RESTORE per disattivare l'OK-UST e 
poi procedete al SAVE di "DEMONI DI 
OSIRIS". 

(ina volta dato II RUN, cl sarà una bre- 
ve attesa nella quale in programma ca- 
rica in memoria La parte in linguaggio 
macchina, dopo la quale vi verranno 
chiesti il livello di velocità ed II nume- 
ro di cannoncini in dotazione. Valori 
medi per un buon gioco sono livello di 
velocità 60 con 5 cannoncini. Ci sarà 
ancora una brevissima attesa per per- 
mettervi di posizionare le dita sul tasti 
di controllo T ed <J. Alla fine del gioco 
verrà visualizzalo il vostro punteggio c 
vi sarà chiesto se volete continuare a 
giocare. Buona fortuna! 
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Note sulla versione per C64 

U versione di "DEMONI DI OSIRIS" 
per II C64 use sette SPRITE per I demo- 
ni c he scendono verso 11 vostro can* 
no nel no. Sono previsti per questa ver- 
sione 6 livelli di difficolti ed un nume- 
ro di cannoncini da 1 a 99. In alternati- 
va alla tastiera potete usare 11 Joystick 
(nella porta 2 )* ed anche qui il tasto 
SHIFT LOCK provoca il fuoco conti- 
nuo. Il tasto F7 congela il gioco, che ri- 
prende alta pressione di qualsiasi altro 
tasto. 

Per digitare questo listato sul 64 è ne- 
cessario usare II programma MLX che 
compare in altra parte della rivista. 
Questa è la procedura da seguire: 
Caricate MU e date il R(JN; quando 


MLX vi chiede gli indirizzi di partenza e 
di fine, battete rispettivamente 49152 
e 51005. Dopo aver caricato in memo- 
ria e salvato "DEMONI" tramite MLX 
non avrete più bisogno di quest'ultimo 
per richiamare il programma: sari suf- 
ficiente battere un 'LOAD"DEMONr\ 
1 J' per il nastro, oppure *LQAD ,+ DE- 
MGNI'\ dJ per il disco. Per Iniziare il 
gioco non resta che digitare 'SYS 
49152’. 

"DEMONI EH OSIRIS” è stato scritto in- 
teramente in linguaggio macchina 
usando )e programmazione modulare. 
Il programma consiste cioè in una se- 
rie di routines (moduli) che sono chia- 
mate da un loop principale. Questa 
tecnica di programmazione permette 


di verificare II funzionamento delle va- 
rie routine* come se fossero unita se- 
parate ed uniche: una volta appurato 
che una routine funziona correttamen- 
te, al può passare a scrivere la succes- 
siva. 

I moduli usati nel programma com- 
prendono una routine per verificare le 
collisioni tra gJI SPRITE. un'altra per 
verificare le collisioni tra SPRITE e ca- 
ratteri, ed una routine per permettere a 
tutti gli SPRITE di oltrepassare il famo- 
so limite nella parte destra dello scher- 
mo (posizione X dello SPRrTE -255), 
L'animazione dei demoni è ottenuta 
con la tenica del rapido cambiamento 
dì Forma dello stesso SPRITE, per si- 
mulare una situazione di movimento. 
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10 POICES2, 27 IPOKE56, 27 1 POKE51, 71 :POKE55 , 7 
1 ! PRIHT" {CLB J " : rOHA- 69 8 4T07 6 7 9 : RBJUJB : t> 
OKBA, BtHEXT : rem 128 

15 POKE649 , 10 : INPUT" VEL . " J A: INPWT"CAIM0HI 
" f B 1 I PA> 2 4 OORB > 2 4 OORA < 10RB< 1THEN 1 5 

trem 190 

20 POKE7074 i A: POKE7039, B t POKE64 9 , 0 : PORB“0 
T02000tNEXT * ! rem 144 

25 SYS6984 : POKE36869 , 240 : PRINT" {CLR } PONTI 
: "PEEK (248) +PEEK (249) *256 iGOTOIS 

. treni 216 

35 DATA162, 10, 169,0,149,247,202,208,251,1 

68.169.59.157.0. 30.157.0.31.232.208.24 

7,141,15 trem 237 

40 DAT\144, 169, 255, 141, 5, 144, 169, 15, 141,1 

4. 144. 138. 157.0. 150. 157. 228. 150. 232. 20 

8,247 trem 93 

45 DATA169, 6, 162, 22, 157, 227, 151, 202, 208, 2 

50.169.5.133.253.200.208.253.232.208.2 

53,169 trem 145 

50 DATA238, 133, 251, 169, 31, 133, 252, 169, 63, 

145.251.165.197.201.50.240.31.201.51.2 

40,13 trem 76 

55 DATA140, 13, 144, 162, 63, 200, 208, 253, 202, 
208,250,240,41,165,251,201,249,240,237 
,32,202 trem 159 

60 DATA27, 230, 251, 76, 196,27,165,251,201,2 
28,240,223,32,202,27,198,251,169,63,14 
5,251 trem 99 

65 DATA208, 215, 169, 129, 141, 13, 144, 169, 59, 
145,251,96,169,1,44,141,2,240,44,162,6' 
6,189 trem 119 

70 DATA161, 31, 201, 61, 240, 35, 202, 208, 246,1 
65,251,56,233,22,133,251,169,61,145,25 
1,165 trem 78 

75 DATA251, 24, 105, 22, 133, 251, 140, 13, 144,1 

69.160.141.11.144.141.10.144.232.208.2 

53.169 trem 114 

80 DATA30, 133, 255, 169, 21, 133 ,254, 162, 21,1 

60,22,177,254,201,61,208,29,32,246,28, 
177,254 trem 190 

85 DATA201, 59, 240, 9, 32, 14, 29, 32, 232, 28, 76 
,50,28,169,61,145,254,32,232,28,169,59 
,145 trem 64 

90 DATA254, 136, 208, 218, 32, 232, 28, 202, 208, 

210.162.22.189.255.29.201.61.208.5.169 
,59,157 irem 202 


95 DATA255, 29, 202, 208, 241, 140, 10, 144, 140, 
11,144,162,66,189,255,29,201,62,240,21 
,202,208 ‘ trem 223 

100 DATA246, 32 ,86,29,165,141,162,0,232-, S6 
,233,12,176,250,169,62,157,255,29 

trem 118 

105 DATA169, 31, 133, 255, 169, 227, 133, 254, 16 
0,22,177,254,201,63,240,3,136,208,247 

trem 55 

110 DATA132, 250, 32, 246, 28, 177, 254, 201, 62, 
208,6,169,59,145,254,16,27,136,177,25 
4,201,62 trem 199 

115 DATA208, 7, 169, 59,145,254,200,16,13,20 
0,200,177,254,201,62,208,24,169,59,14 

5.254.136 trem 244 

120 DATA32, 232, 28, 32, 4, 29, 169, 59, 160, 22,1 

53,227,31,136,208,250,76,130,27,160,2 

2.169.59 trem 190 

125 DATA145, 254, 136, 208, 251, 162, 21, 32, 246 

, 28, 160, 22, 177, 2S4, 201, 62, 208, 3, 32, 11 

3.29.136 trem 178 

130 DATA20B, 244, 202, 208, 236, 76, 148, 27, 165 

,254,24,105,22,133,254,165,255,105,0, 
133,255,96 trem 35 

13S DATA165, 254, 56, 233, 22, 133, 254, 165, 255 
,233,0,133,255,96,177,254,201,63,240, 
12,201,61 trem 234 

140 DATA208, 67, 230, 248, 208, 13, 230, 249, 208 
, 9, 169, 42, 141, 15, 144, 198, 253, 240, 69,1 

69.60.145 trem 6 

145 DATA254, 165, 255, 24 ,105, 120, 133, 255, 17 

7.254.72.169.2.145.254.169.222.141.13 
,144,230 trem 193 

150 DATA146, 208, 252, 206 ,13, 144, 48, 247, 104 
,145,254,165,255,56,233,120,133,255,1 

69.59.145 trem 255 

155 DATA254, 141,15,144,96,169,62,145,254, 

96,72,138,72,152,72,32,148,224,104,16 
8,104,170 trem 6 

160 DATA104, 96, 160, 0,140, 14, 144, 169, 27, 14 

1.15.144.104.104.96.169.240.141.12.14 

4.169.59 trem 184 

165 DATA145,254 , 32, B6, 29, 32,232,28, 138,24 

,105,32,10,10,197,141,16,42,177,254,2 
01,59,208 trem 239 

170 DATA6, 169, 62, 145, 254, 16, 58, 169, 48, 197 
,141,16,12,192,1,240,8,136,169,62,145 
,254,200 trem 210 

175 DATA16, 40, 192, 22, 240, 240, 200, 169, 62,1 
45,254,136, 16,28,196,250,240 , 228, 4B , 1 
2,136,196 trem 246 
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180 DATA250, 208, 1,200 ,169,62,145, 254,16,1 
0,200,196,250,208,1,136,169,62,145,25 
4 , 169 , 0 : rem 131 

185 DATA141, 12, 144, 76, 246, 28, 0,0, 0,0, 0,0, 
0,0,4,168,214,72,37,170,80,20,0,16,56 

:rem 254 

190 DATA40, 40, 40, 56, 16, 60, 90, 255, 126, 36, 6 
6,66,36,16,16,16,16,56,124,124,254 

:rem 160 
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49152 : 169,000, 162,024, 157,000,000 
49158 : 212, 202, 208, 250, 032,019,161 
49164 : 198,169,001,141,033,208,250 
49170 : 169, 147,032,210, 255,169, 232 
49176 : 000, 141, 102,003, 169,000, 183 
49182 : 141, 142,003,141,143,003, 091 
49188 :169,000,162,255,157,000,011 
49194 : 206, 157, 000, 207, 202, 208, 254 
4 9200 ; 247, 169,22 5, 141,096,207,109 
4 9206 : 169, 000, 141, 097, 207, 169, 069 
4 9212 : 192, 141, 248, 007, 169, 001, 050 
4 9218 : 141,0 39, 208,032,017, 196,187 
4 9224 : 0 32, 080, 196, 032, 181, 196, 021 
49230 : 032, 010, 194,169,000, 141,112 
49236 -.209,207,169,255,141,021,062 
49242 :20S,024, 169,000, 141,098,218 
49248 : 207, 105, 036, 14 1,100, 207, 124 
49254 : 105, 036, 141, 10 2,207, 105,030 
49260 : 036, 141, 104, 207, 10 5, 036, 225 
49266 :141, 106, 207, 105,036, 141,082 
49272 :108, 207, 105, 036, 141, 110,059 
49278 : 207, 169, 002, 141,092,003,228 
49284 :169, 144, 032, 210, 255, 169,087 


49290 : 165, 141, 000, 207, 169,000, 052 
49296 : 14 1,001, 207, 16 9,015, 141,0 50 
49302 :024, 212, 169,017, 141,005, 206 
49308 : 2 12, 169, 248, 141, 006, 212, 120 
49314 : 169,005, 141,000, 212, 141,062 
49320 : 00 5, 212, 169,020,141, 152,099 
49326 *003,169,000,141,032,200,215 
49332 *173,030,208,173,031,208,235 
49338 *032,230,192,032,069,193,166 
49344 *032,168,193,032,209,193,251 
49350 *172,083,003,140,102,003,189 
49356 *032,075,194,032,108,194,071 
49362 *032,046,195,032,059,195,001 
49368 *032,191,195,032,227,197,066 
49374 *206,102,003,208,233,076,026 
49380 *186,192,162,014,056,189,003 
49386 *000,207,233,000,157,032,095 
49392 *207,189,001,207,233,001,054 
49398 *029,032,207,176,018,173,113 
49404 *016,208,061,039,193,141,142- 
-4 9410 *016,208,18 9,000,207,157,011 
49416 *000,208,076,028,193,189,190 
4 9422 : 000,20 7,157,000,208,189,007 
49428 *054,193,013,016,208,141,133 
49434 *016,208,189,096,207,157,131 
49440 *001,208,202,202,016,194,087 
49446 *096,254,000,253,000,251,124 
49452 *000,247,000,239,000,223,241 
49458 *000,191,000,127,001,000,113 
49464 *002,000,004,000,008,000,070 
49470 *016,000,032,000,064,000,174 
49476 *128,173,000,220,041,008,126 
49482 *240,006,165,197,201,030,145 
49488 *208,036,056,173,000,207,248 
49494 *233,060,141,062,003,173,246 
49500 *001,207,233,001,013,062,097 
49506 *003,176,017,024,173,000,235 
49512 *207,105,008,141,000,207,004 
49518 *173,001,207,105,000,141,225 
49524 *001,207,173,000,220,041,246 
49530 *004,240,006,165,197,201,167 
49536 *022,208,036,056,173,000,111 
49542 *207,233,026,141,064,003,040 
49548 *173,001,207,233,000,013,255 
49554 *064,003,144,017,056,173,091 
49560 *000,207,233,008,141,000,229 
49566 *207,173,001,207,233,000,211 
49572 *141,001,207,096,173,000,014 
49578 *207,141,192,207,173,001,067 
49584 *207,141,193,207,056,173,129 
49590 *192,207,233,012,141,192,135 
49596 *207,173,193,207,233,000,177 
49602 *141,193,207,160,003,078,208 
49608 *193,207,110,192,207,136,221 
49614 *208,247,096,173,076,003,241 
49620 *201,004,144,043,173,000,009 
49626 *220,041,016,173,000,220,120 
49632 *041,016,240,012,169,000,190 
49638 *141,076,003,173,141,002,254 
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49644 : 041, 001, 240, 019, 162, 023, 210 
49650 : 172, 192,207,024,032,240,085 
49656 : 255, 169,079,032,210,255,224 
49662 : 169,000,141,076,003,032,163 
49668 : 173, 195, 238, 076, 003, 096, 017 
49674 :173, 162,003, 141,249,007,233 
49680 : 141, 250, 007, 141, 251, 007, 04 5 
49686 : 141,252, 007,141, 253, 007, 055 
49692 :141,254,007, 141, 255, 007, 065 
49698 : 169, 000, 141, 033,208,169, 242 
49704 1002,141,040,208,169,004,092 
49710 1141,041,208,169,007,141,241 
49716 1042,208,169,009,141,043,152 
49722 1208,169,010,141,044,208,070 
49728 1169,001,141,045,208,169,029 
49734 1005,141,046,208,096,169,223 
49740 1255,141,015,212,169,128,228 
49746 1141,018,212,169,000,141,251 
49752 1209,207,024,173,027,212,172 
49758 1105,045,141,208,207,173,205 
49764 1209,207,105,000,141,209,203 
49770 1207,096,174,092,003,189,099 
49776 1096,207,201,025,176,033,082 
49782- ll38, 074, 170, 173, 162,003,070 
49788 :157,248,007,138,010,170,086 
49794 :173,208,207,157,000,207,058 
49800 1173,209,207,157,001,207,066 
49806 1189,054,193,013,021,208,052 
49812 1141,021,208,189,096,207,242 
49818 1201,130,144,116,024,173,174 
49824 1000,207,105,020,141,128,249 
49830 1207,173,001,207,105,000,091 
49836 1141,129,207,056,173,000,110 
49842 1207,233,020,141,064,207,026 
498-48 1173,001,207,233,000,141,171 
49854 1065,207,056,189,000,207,146 
49860 1237,064,207,157,160,207,204 
49866 1189,001,207,237,065,207,084 
49872 1029,160,207,144,024,056,060 
49878 1189,000,207,237,128,207,158 
49884 1157,161,207,189,001,207,118 
49890 1237,129,207,029,161,207,172 
49896 1144,040,076,001,195,024,200 
49902 1189,000,207,105,001,157,129 
49908 1000,207,189,001,207,105,185 
49914 1000,157,001,207,076,018,197 
49920 1195,056,189,000,207,233,112 
49^26 1001,157,000,207,189,001,049 
49932 1207,233,000,157,001,207,049 
49938 1024,189,096,207,105,001,128 
49944 1157,096, 207 ,238,092,003,049 
49950 1238,092,003,173,092,003,119 
49956 1201,015,144,005,169,002,060 
49962 1141,092,003,096,173,031,066 
49968 1208,141,000,206,173,030,038 
49974 1208,141,032,206,096,162,131 
49980 1006,173,000,206,061,166,160 
49986 1195,240,071,189,249,007,249 
49992 1201,195,240,064,238,142,128 


49998 1003,208,003,238,143,003,164 
50004 1169,005,141,000,212,141,240 
50010 1001,212,169,195,157,249,049 
50016 1007,169,129,141,004,212,246 
50022 1169,128,141,004,212,032,020 
50028 1144,195,189,166,195,073,046 
50034 1254,009,001,045,021,208,140 
50040 1141,021,208,169,032,162,085 
50046 1000,157,000,004,157,000,188 
50052 1005,157,000,006,232,208,228 
50058 1244,096,202,016,174,096,198 
50064 1160,020,169,255,133,002,115 
50070 1198,002,208,252,136,192,114 
50076 1000,208,247,096,169,128,236 
50082 1141,004,212,096,002,004,109 
50088 1008,016,032,064,128,032,192 
50094 1234,232,169,001,141,134,061 
50100 1002,165,197,201,003,208,188 
50106 1003,032,042,198,096,173,218 
50112 1032,206,041,001,240,074,018 
50118 1173,032,206,073,255,009,178 
50124 1001,045,021,206,141,021,129 
50130 1208,173,030,208,169,033,007 
50136 1141,004,212,162,030,142,139 
50142 1001,212,202,202,032,144,247 
50148 1195,202,224,010,176,243,254 
50154 1169,032,141,004,212,169,193 
50160 1005,141,001,212,169,001,001 
50166 1141,033,208,169,147,032,208 
50172 1210,255,169,002,141,033,038 
50178 1208,169,000,141,033,208,249 
50184 1206,137,003,208,003,076,129 
50190 1108,197,096,169,001,141,214 
50196 1033,208,162,015,189,064,179 
50202 1196,157,236,005,160,000,012 
50208 1169,014,032,210,255,152,096 
50214 :157,236,217,202,016,236,078 
50220 1160,020,140,132,003,206,193 
50226 1132,003,032,144,195,032,076 
50232 1144,195,173,132,003,208,143 
50238 1242,096,068,005,013,015,245 
50244 1014,019,032,015,006,032,186 
50250 1079,019,009,018,009,019,227 
50256 1160,000,169,147,032,210,030 
50262 1255,169,160,141,010,005,058 
50268 1169,000,141,010,217,162,023 
50274 1012,189,168,196,157,253,049 
50280 1004,152,157,253,216,202,064 
50286 1016,243,032,228,255,201,061 
50292 1049,144,249,201,055,176,222 
50298 1245,141,133,003,169,144,189 
50304 1032,210,255,162,006,160,185 
50 310 :026,032,240,'255,173,133,225 
50316 1003,032,210,255,160,010,042 
50322 1140,132,003,032,049,196,186 
50328 1056,173,133,003,233,048,030 
50334 1010,010,010,024,105,010,071 
50340 1141,083,003,096,076,005,056 
50346 1022,005,012,058,049,032,092 
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50352 £084,079,032,054,063,162,138 
50358 £017,189,090,197,157,234,042 
50364 £ 005, 160, 000, 1S2, 157, 234, 128 
50370 £217,202,016,241,169,032,047 
50376 £141,254,005,141,255,005,233 
50382 £032,228,255,201,048,144,090 
50388 £241,201,058,176,237,141,242 
50394 £134,003,162,012,160,030,207 
50400 £032,240,255,173,134,003,037 
50406 :032,210,255,032,228,255,21S 
50412 £201,013,240,078,201,048,249 
50418 £144,245,201,058,176,241,027 
50424 £141,135,003,162,012,160,093 
50430 £031,032,240,255,173,135,096 
50436 £003,032,210,255,056,173,221 
50442 £134,003,233,048,141,134,191 
50448 £003,056,173,135,003,233,107 
50454 £048,141,135,003,173,134,144 
50460 £003,010,141,137,003,010,076 
50466 £010,024, 109 ,137, 003, 024, 085 
50472 £109,135,003,141,137,003,056 
50478 £240,150,160,010,140,132,110 
50484 £003,032,049,196,169,147,136 
50490 £032,210,255,096,173,134,190 
50496 £003,056,233,048,141,137,170 
50502 £003,240,014,160,010,140,125 
50508 £132,003,032,049,196,169,145 
50514 £147,032,210,255,096,076,130 
50520 £198,196,032,032,078,021,133 
50526 £013,002,005,018,032,015,179 
50532 £006,032,066,001,019,005,229 
50538 £019,063,169,147,032,210,234 
50544 £255,169,000,141,021,208,138 
50550 £169,001,141,033,208,162,064 
50556 £006,189,221,197,157,039,165 
50562 £005,169,000,157,039,217,205 
50568 £202,016,242,160,024,162,174 
50574 £007,032,240,255,173,143,224 
50580 £003,174,142,003,169,000,127 
50586 £141,134,002,032,205,189,089 
50592 £162,017,189,203,197,157,061 
50598 £236,005,160,000,152,157,108 
50604 £236,217,202,016,241,165,225 
50610 £197,201,025,208,002,240,027 
50616 £008,165,197,201,039,208,234 
50622 £242,240,003,076,000,192,175 
50628 £169,000,133,198,076,000,004 
50634 £008,080,012,001,025,032,104 
50640 £065,007,001,009,014,032,080 
50646 £089,032,015,018,032,078,222 


50652 :063,083,003,015,018,005,151 
50658 :032,032,007,198,206,152,085 
50664 £003,173,152,003,048,019,118 
50670 £173,152,003,201,010,176,185 
50676 £006,169,193,141,162,003,150 
50682 £096,169,194,141,162,003,247 
50688 £096,169,020,141,152,003,069 
50694 £096,162,006,173,162,003,096 
50700 £157,249,007,202,016,247,122 
50706 £096,162,255,189,060,198,210 
50712 £157,000,048,202,208,247,118 
50718 £162,010,189,060,198,157,038 
50724 £000,048,202,016,247,096,133 
50730 £169,000,133,198,032,144,206 
50736 £195,165,197,201,003,240,025 
50742 £250,201,064,240,246,096,127 
50748 £000,000,000,000,000,000,060 
50754 £000,000,000,000,000,000,066 
50760 £000,028,000,000,127,000,227 
50766 £001,255,192,007,156,240,161 
50772 £015,028,120,030,062,060,143 
50778 £060,127,030,120,255,143,057 
50784 £113,255,199,099,255,227,220 
50790 :099,255,227,099,255,227,240 
50796 £097,255,195,096,255,131,113 
50802 :096,127,003,127,255,255,209 
50808 £127,255,255,255,024,000,012 
50814 :024,012,000,048,195,060,209 
50820 :195,099,255,198,031,255,141 
50826 £248,063,255,252,255,255,186 
50832 :255,127,255,254,127,255,137 
50838 £254,239,024,247,225,153,012 
50844 £135,096,126,015,096,001,113 
50850 £255,048,003,048,056,003,063 
50856 £192,015,224,000,003,000,090 
50862 £000,001,224,000,000,000,143 
50868 £000,000,000,000,000,000,180 
50874 £000,255,096,000,006,048,079 
50880 :000,012,204,060,051,099,106 
50886 £255,198,031,255,248,063,224 
50892 £255,252,255,255,255,127,06.7 
50898 £255,254,127,255,254,239,058 
50904 £024,247,225,153,135,096,072 
50910 £126,003,127,128,003,049,146 
50916 £128,006,030,000,014,000,150 
50922 £003,248,000,000,096,000,069 
50928 £003,192,000,000,000,000,179 
50934 £000,000,000,000,000,255,245 
50940 £000,000,000,006,195,096,037 
50946 £000,000,000,048,219,012,025 
50952 £000,102,000,000,219,096,169 
50958 £000,060,000,182,219,109,072 
50964 £001,153,128,048,219,012,069 
50970 £000,060,000,054,219,108,211 
50976 £000,102,000,024,219,012,133 
50982 £000,000,128,006,195,096,207 
50988 £000,000,000,000,000,000,044 
50994 £000,000,000,000,000,000,050 
51000 £000,000,000,255,000,105,160 
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di M. CrUiuib Grlnl 


C olorbot è un divertente gioco 
d’azione per il VIC inespanso e per 
il C64, che fa largo uso di caratteri gra- 
fici multicolori e di effetti sonori* Il gio- 
co è per un giocatore alla volta e ri- 
chiede il joystick* Più a lungo sì resiste 
agli attacchi del Colorbot. più difficile 
sari raggiungere la vittoria. 

Neìl anno 2000 iumanitò ha sovraffol 
lato il Pianeta con apparecchi TV. vi- 
deogiochi* home computer, ed ogni 
possibile marchingegno elettronico* 
Attraverso un incredibile esperimento 
genetico, tutti questi apparati si sono 
trasformati In "Colorbot una razza di 
robot ìperlntelllgente capace di pensa- 
re autonomamente, I Colorbot hanno 
stabilito — con la loro logica aliena — 
che l'uomo é un essere inferiore e per 
questo va distrutto. 

Dopo aver studiato la vulnerabilità 
umana nei confronti dei t'e lettrici ti ed 
aver sovraccaricalo la Terra con un 
campo di forza protonico ad alta ten- 
sione, queste creature frutto della 
mente umana hanno tentato ogni si- 
stema per raggiungere II proprio scopo 
di annientamento* 

Fortunatamente, voi e pochi altri avete 
qualcosa nella struttura cellulare che 
vi rende immuni dal poteri dei Color- 
bot; armali con una specie di fresbee 
elettronico toccherà a voi cercare dì di- 
struggere Ì Colorbot prima che essi an- 
nientino completamente 1'umanità* 
All’Inizio del gioco vi trovate posizio- 
nati al centro del campo; altrove sullo 
schermo d sono tre guerrieri Colorbot* 
Potete muovervi in qualsiasi direzione 
con il joystick {porta 2 sul C64) e* per 
lanciare il fresbee elettronico, premete 
N bottone di fuoco posizionando II joy- 
stick nella direzione In cui volete spa- 
rare. Nel campo di battaglia sono Inol- 
tre disposti casualmente dei muri per 
corsi da atta tensione che non possono 
essere toccati né da voi né dal Color- 
bot, pena la vaporizzazione, 

J Colorbot sono programmati per inse 
guìrvi, ed il sistema migliore per di- 
struggerli, oltre a! fresbee, è quello di 
farsi inseguire fino ad un muro elettri- 
co per fare in modo che essi lo tocchi- 
no autodistruggendosi. Quando un 
Colorbot viene distrutto guadagnate 


10 punti ed un nuovo Colorbot appare 
a caso sullo schermo. 1 muri decresco- 
no gradualmente in numero con II pro- 
cedere del gioco, ed ogni tanto un Co- 
lorbot lascia dietro di sé una piccola 
Colorbomba, che vi sarà fatale se cl 
passate sopra. Più Colorbot distrugge- 
rete. più rapidamente si muoveranno* 
e dopo un po' vi inseguiranno due soli 
Colorbot, ma molto velocemente. 
Avete a disposizione 4 uomini per sal- 
vare l'umanità dall'estinzione. Perdere- 
te un uomo toccando qualsiasi cosa 
che stia lampeggiando in diversi colo- 
ri, ma avrete in bonus un uomo più 
100 punti se raggiungerete quota 200 
oppure 800. 

Ciao del programmi 

"Colorbot” è scritto interamente In 
BASIC, salvo una piccola routine in 
linguaggio macchina usata per cam- 
biare continuamente ì colori dei carat- 


teri grafici senza rallentare II gioco. Se 
avete un VJC 20. dovete prima digitare 
Il Programma 1 e salvarlo. Questo prò 
grammo carica In memoria uno spi- 
cìale set di caratteri e la routine In lin- 
guaggio macchina. Dopo averlo salva- 
to su cassetta, battete NEW e digitate II 
Programma 2. quindi registratelo do- 
po Il Programmo l* A questo punto po- 
tete caricare ed eseguire il Programma 
1) questo caricherà automaticamente 
il Programma 2. 

Se invece possedete un disk drive* bat- 
tete il Programma I (cancellate la linea 
140) e salvatelo; quindi battete H nu- 
mero 2 e salvatelo a sua volta. Caricate 
quindi ìl primo che definisce i caratteri 
e. una volta eseguito* caricate il secon- 
do ed eseguitelo. 

Un'ultima cosa: cl sono molteplici ef- 
fetti sonori In questo programma, 
quindi assicuratevi che il volume del 
vostro apparecchio TV sia regolato 
correttamente. Buona fortuna! 
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Colorbot per VIC 20 

Programma 1 


9 REM COLORBOT VERSIONE VXC2Q PRG*#1 

: r e m 155 

10 POKE5 5 , 0 ; POKE 56 ,29 : CLR : rem 220 

1 5 POKE36869 f 240 : P0KE36879 , 10 : PRINT" {CLRÌ 

{ 2 GltPJl 6 DESjCOLORBOT 11 : rem S4 

20 PRINT"£ 2 GIO'H 2 DESÌSTO CARICANDO" : 

PEINT" { 2 DES } I L SET DI CARATTERI ” 

;rem 251 

25 DATAO, 0,0, 0,0, 0,0,0 srem 53 

30 DATA 5 6 ,84,56, 84,146,40, 104, 12: rem 86 
35 DATA56, 84, 56, 84,146, 40, 44,96 srem 58 

40 DATAO, 0,32* 184,32,0,0,0 : rem 9 

45 DATA 4,8,63,63,46,38,4,21 : rem 97 

50 DATAO, 0,48,48,0,0,0,0 : rem 171 

55 DATAO, 0,0, 0,0,255,255,170 ;rem 120 

60 DATA224, 224, 224, 224, 224, 224, 224, 224 

srem 116 

65 DATA11, 11,11, 11,11, 11,11, 11 : rem 2Gl‘ 

70 DATA170, 255,255,0,0, 0,0,0 :rem 117 
75 DATA170, 170,190, 190, 190,190, 170,170 

srem 130 

80 DATA141, 253,29, 238,255,29,173,255 

srem 44 

85 DATA29 , 201 , 2 55 , 208 , 6 , 173 , 253 , 29 

srem 197 

90 DATA76, 191, 234, 238, 254, 2 9, 17 3, 2 54 

; rem 4 9 

95 DATA29, 201, 2, 208, 240, 169, 0,1 41 

s rem 130 

100 DATA2 54, 29,24, 173,14, 144, 105,16 

;rem 225 

105 DATA 141,14, 144,76, 104 ,29, 14,144 

srem 227 

110 DATA201, 224,48, 5, 169, 15, 141,14 

srem 173 

115 DATA144, 174, 252,29,76, 104,29: rem 95 
120 FGRI-OTOlSO sREADX :rem 23 

125 POKE7424+I ,X:NEXT srem 9 

130 PRINT" {CLR } { 2 GIU '} FATTO , ORA CARICO 
IL* 1 SPRINT" PROGRAMMA PRINCIPALE* . " 




: rem 

224 

135 

PRINT 

: rem 

38 

140 

POKE198 , 1 S POKE 6 3 1,131 :END 

srem 

152 

145 

REM SE USATE IL DISK DRIVE 

CANCELLATE 


LA LINEA 140 

: rem 

41 


150 REM POI CARICATE ED ESEGUITE IL PROGR 
AMMA #2 srem 18 


Colorbot versione per VIC 20 

Programma 2 

9 REM COLORBOT VERSIONE PER VIC2G - PRG * t 

2 : r em 1 7 6 

10 PQKE7679 , 1 s POKE767B , 1 srem 108 

15 POKE 3 7158,200: PO KE 371 59, 200 srem 139 
20 POKE 3 7166,123: POKE 783,88: POKE? 8 9 , 2 9 t PO 

KE 3 7 166, 192 srem 235 

25 POKE 36878, 15s POKE 36869,255: POKE 36879, 1 
0 ' : rem 128 

30 D I M X (3) , Y ( 3 } ,Z(4) : FORI - 1T03 : DEFFNP ( I ) = 
7680+X ;(I)+22*Y(I) : rem 61 


35 A=0:C*30720: DEFFNQ ( A ) =7680+X+22*Y:Xl*3 
3:SL«10sSl*5:S2*15:MN-4 :rem 168 

40 FORI * ITO 4 : RE AD Z ( I } s NEXT : DATAI 50 , 1 60 , 1 8 
0,200 srem 204 

45 PRI NT" { CLR} *' : FORI = 1T0S2 : R=772 4+RND (1) * 
3 74 : POKER , 42 : POKER+C , 11+RND ( 1) * 3 

srem 181 

50 POKE36876, 200+RND (1) * 50 : NEXT: POKE36876 
,0 srem 204 

5 5 FORI *7 702TO7 72 3 S POKEI , 38 : PQKEI+C , 14 : PO 
KE 1 + 462, 41: POKE X +C+4 62,14: NEXT 

srem 18 

60 F0RI*7724T08142STEP22: POKEI ,39: POKEI+C 
, 14 : POKEI + 21 , 40 : POKEI+C+21 ,14: NEXT 

srem 60 

65 POKE646, 14 SPRINTÒ HOME H 5 GIU 1 } 

{ 3 DES }****{ 3 SINHGIU 1 } (SINÌ^lGIU 1 } 
{SIN}*lGiU' }{SIN}*" srem 156 

70 PRINT"{ 6 GIU'H 18 DES } * {GIU 1 H SIN } * 
f GIU 1 }{SIN}*{GIU* }{SIN}*{ 4 SIN}****" 

:rem 118 

75 POKE646 , 0 : rem 151 

80 H*Q ; X* 10 : Y-10 : rem 126 

85 FORI * ITO 3 S X { I ) *INT (RND 1 1) * 18 ) +3 : Y ( I ) • I 
NT { RND (1) *19) +3: NEXT : rem 84 

90 GOSUB 430; POKE 37154,127 : rem 179 

95 FORI ■ ITO 3 : POKEPNP ( I ) ,36: POKEFNP ( I ) +C , 1 



3: NEXT 

: rem 

IBS 

100 

POKEFNQ (0) , XI : POKEFNQ ( 0) +C , 

1 SFORI 

*128 


T0254 : POKE36874, 1 ! NEXT: POKE36874 , 

0:21 


-1 

: rem 

92 

105 

FORI « ITO 3 : POKEFNP ( I ) , 3 6 i PO KEFNP ( I ) +C , 


13 S NEXT 

: rem 

228 

110 

POKEFNQ (0) ,X1: POKEFNQ (0)+C, 

1 : rem 

118 

115 

GOSUB440 

: rem 

175 

120 

IFF* 1THEN2G5 

; rem 

156 

125 

IFJO=1THENGOSUB475 : GOSUB 4 SO 

s rem 

177 

130 

IFJ l at lTHENGOSUB485 : GOSUB450 

; rem 

175 

135 

IFJ2»1THENGOSUB495:GOSUB450 

s rem 

182 

140 

IFJ3=1THENGOSUB505:GOSUB4SO 

: r em 

171 

145 

POKE3 68 7 5,0 

t rem 

50 

150 

IFH-1THEN325 

s rem 

164 

155 

R=INT (RND ( 1} *SL) +1 : IFR> 3THENÌ0 5 




s rem 

66 

160 

POKEFNP C R > , 32:POKE3 687 4, 128+ (R* 20) 



: rem 

116 

165 

IFINT tRND 1 1) *51) -1THENPOKEFNP (R) , 

37 : P 


OKEFNP (R) +C ,44 

: rem 

86 

170 

IFX<X (R>THENX(R}*X (R) -1 

: rem 

118 

175 

IFX>X ( R) THENX (R) -X <R) +1 

: rem 

lì 3 

180 

IFY<Y (R)THENY(R} -Y(R> -1 

: rem 

123 

185 

IFY>Y (R)THENY(R) =Y(R)+1 

: rem 

128 

190 

POKE3 6 874,0:1 FX ( R ) *XANDY (R) 

=YTHEN325 



: rem 

184 

195 

IFPEEK ( FNP ( R) ) * 4 2THENFORI * 2 54 TQ2 4 OSTE 


P- *6:POKE36874, 1 ; NEXT: POKE36874 , 0 

S I *R 


; GOTO 2 90 

: rem 

97 

200 

GOTOIOS 

s rem 

97 

205 

B=X : D=Y 

: rem 

130 

210 

I F J 0 * 0 AND J 1 - 0 AND J 2 - 0 AND J 3 = OTHENl 5 5 



: rem 

7 

215 

G0TO225 

: rem 

106 

220 

POKE7680+B+22*D,32 

s rem 

147 

225 

IFJ0*1THENB=B+1 

srem 

92 

2 30 

I FJ 1* 1THEND-D+ 1 

: rem 

93 

235 

IFJ 2 = 1THENB*B- 1 

: rem 

97 

240 

I FJ 3 * 1THEND*D- 1 

: rem 

98 

245 

IFPEEK (7680+B+22*D) >35THEN260 




: rem 

76 


250 POKE7680+B+22*D,35:POKE38400+B+22*D, 1 
5 srem 253 


28 SUPE3VJC- 



255 FORO* ITO 2 ! NEXTIGOTO220 trem 149 

260 p-7680+B+22*D:Fl-PEEK (P) : rem 34 

265 IFP15 37T7IBN155 : rem 31 

270 FORO-250TO210STEP-3 : POKE36877 ,0: POKEP 
,RN0 (1) *2 55 : NEXT: POKE36B7 7,0: rem 198 
275 IFP1-37THENP0KEP,32:G0T0155 irei» 162 
280 POKEP, 32 :F0RI-lT03i IPX (1 > -8 ANDY ( I) -DT 
HEN 290 : rem 163 

285 HEXT:G0T0155 : rem 236 

290 X ( I ) - INT ( RND { 1) * 1B ) +3 : Y {I ) -INT { RND ( 1) 
*19) +3 : rem 91 

295 SOSC+10:IF5C>2000RS0 800THENCOSUB415 

: rem 24 


300 GOSUB430 : FORO-1TO400 :NEXT: POKEPNP ( I) , 
36 iPOKEFHP ( I) +C, 13 SFORO -2SOTO140STEP- 



8 

a rem 

182 

305 

POKE 36876,0: NEXT! PO KE36876 

t 0; rem 

156 

310 

SL-SL- ,2il FSL< 1THENSL- 1 

trem 

173 

315 

Sl-Sl-.2:IFSl<2THENSl-2 

arem 

72 

320 

G0T0155 

: rem 

105 

325 

MN-MN- 1 : GOSUB4 30 

t rem 

188 

3 30 

FORQ1-1T016 ; FORQ2-180TO240STEP6: POKE 3 


6876, Q2 i NEXT: POKEFNQ (0) +C, 

1+RNDU) *8 



a rem 

200 

335 

NEXT 

: rem 

218 

340 

POKE36876 , 0 : POKEFNQ { 0 ) ,32 

trem 

144 

34 5 

S2-S2-5 

: rem 

69 

350 

IFMNOOTHEN4S 

; rem 

4 

355 

POKE646, 10 

: rem 

249 

360 

PRINT" {HOME] :FORI-lTO22i 

PRINT"* 





185: POKEI ,42 

: rem 

41 

365 

POKEI+C, 10 iNEXT 

: rem 

138 

370 

POKE36879, 14: PRINT" {WHT) (HOME) 



( 5 GIU 1 } ( 6 DES ){ RVS) GAME { 2 SPAZI) 


OVER" 

; rem 

249 

375 

PRINT" { 2 GIU * } { RVS } GIOCHI 

ANCORA 



{ SPASI } (S/N) ?" 

: rem 

11 

380 

FORQl» 128T0254 ; POKE3687 5 , Ql : POKE36875 


, Ql- 10: NEXT :POKE3 6875,0 

trem 

59 

385 

POKE37154 ,255 

: rem 

155 

390 

GETAS : IFA$<>"S"ANDA$<>"N ,, THEN390 




: r em 

47 

395 

I FA$ * "S " THENRUN 

trem 

141 

400 

SYS65418 

: rem 

155 

4 05 

POKE 371 5B f 137: POKE37159, 66 

: rem 

161 

410 

POKE36879, 27 :POKE36869, 240: PRINT" 



{ CLR } {BLU } " : END 

: rem 

115 

4L5 

MN-HN+1;SC«SC+1OQ:GOSUB430 

rrem 

25 


420 FORQ 1“ ITO 10 : POKE 3 6876 , 240 : FORQ2 ■ 1TO80 
! NEXT : POKE368 76 , 0 : FORQ2-1TO80 :NEXT: NE 
XT : rem 34 

425 RETURN :rem 123 

430 PRINT" (HOME) {YEL} { RVS ) PUNTI i {CYN )" j S 
Cj " {YEL] UOMINI: { PUR ] " ; MN J " { SPAZ I } 
[OFF]"; : rem 235 

435 RETURN ; rem 124 

440 P-PEEK(37152)AND128:J0--<P-0) :P-PEEK( 
37151) iJ 1--((PAND8)-0) :J2--(<PAND16) = 
0 ) : r era 1 8 3 

445 J3-- { (PAND4) -0) iF«- ( (PAN032) -0) : RETUR 


485 POKEFNQ {0 ) , 32: Y-Y+l i IFY> 21THENY- Y- 1 IH 
*1 : rem 123 

490 RETURN :rem 125 

495 POKEFNQ (0) , 32 ; X-X-l : IFX< 1THENX-X+1 : H- 
1 : rem 67 

500 RETURN trem 117 

505 POKEFNQ (0) , 32 : Y-Y- 1 : IFY< 2THENY-Y+1 :H- 
1 trem 65 

510 RETURN irei» 118 



Colorbot versione per C64 

1 POKE2, 48 : POKE56, 48 :CLR: POKE53280 , IStPOK 

E53281 , 0 i rem 118 

2 PRINT" {CLR ) {WHT] ( 12 GIU’M 6 DESISTO R 



IDE FINENDO I CARATTERI" 

: rem 

26 

3 

PRINT" {HOME} ( 7 GIU'H 16 

DES JCOLORBOT" 


:GOSUB1000 

: rem 

61 

4 

DIMX(3) ,Y{3) ,Z{4) : X-RND ( 0) 

: r em 

50 


5 Z { 1) -150: Z (2) -160: Z{3) -1B0 : Z (4) -200 

: rem 165 

7 C*54272s FOR I -CTOC + 24: POKE 1,0: NEXT 

trem 163 

8 POKEC+24 , 1 S : POKEG+ 5,17: POKEC+6 ,240: POKE 

C, 100 : rem 169 

20 P0KE56333,127:POKE788,BS:POKE789,49:PO 
KE 56333, 129 : rem 230 

25 POKE 5 3280,2: POKE 53281,0 : rem 190 

30 FGRl-ÌTQ3:DEFFNP(n «1024+XfI) +4Q*Y(I} 

: rem 4 3 

35 A»0 : DÈFPNQ { A) ■ 1024+X+4 0 * Y : XI ■ 33 : SL* 10 : 

Sl-5: S2-l5:MN-4 ; rem 228 

45 PRINT" {CLR }" : FORI- lTOS2:R« 1104 +RNO (1} * 
8 80 : POKER ,42: POKER+C , 1 1+RND ( 1) * 3 

-.rem 169 

50 PGKEC + 1, IQQ + RNDU) * 50 : FOKEC+4 , 17 : NEXT: 

PQKBC+4,16 trem 198 

55 PORI * 1 0 6 4 TO 1 1 0 3 : POKE 1,38: POKE I +C ,14: PO 
KEI+920, 41 1 POKEI +C+920 , 14 : NEXT 

arem 253 



N 

: rem 

133 

4 50 

Xl-Xl+1 : IFX1>34THENX1*33 

arem 

150 

455 

Zl-Zl+1 : IFZ1>4THENZ1-1 

: rem 

59 

460 

POKE 36 8 7 5, Z f ZI) 

t rem 

56 

465 

IFPEEK (FNQ (0) ) >34THENH-1 

: rem 

148 

470 

POKEFNQ ( 0 ) ,Xl : POKEFNQ (0 ) +C, 

1 : RETURN 



: rem 

153 

475 

POKEFNQ (0) , 32 : X»X+1 : IFX> 20THENX-X- 

■IsH 


*1 

: rem 

116 

480 

RETURN 

trem 

124 


60 FORI ■1104TOÌ 944STEP40 : POKBI , 39 ; POKEI+C 
, 14 : PO REI *39, 40: PO REI +C+39, 14: NEXT 

» * :rem 67 

65 PRINT" {HOME] [<7>J{ 5 GIO' M 3 DES}**** 
{ 3 SIN} (GIU 1 } {SIN J * {GIU * j { SIN ) * 

( 4 SIN}****" trem 224 

70 PRINT"(<7>H 7 GIU 1 } £ 33 DBS}*{GIU'} 
{SIN}* {GIU 1 j { S IN } * (GIU 1 } {SIN}* 

{ 4 SIN}****" : rem 212 

80 H-0 : X-20 :Y-10 trem 127 


suPEfivic* im* 29 




85 FORI «ITO 3 : X ( I } - INT ( RND ( 1) * 36 ) +3 ? Y { I } -I 

NT ( RND ( 1} *19) +3: NEXT :rem 84 

90 GOSUB43C : rem 128 

95 FORI “ITO 3 : POKEFNP ( I ) , 36 : POKEFNP ( I ) +C , 1 
3 : NEXT :rem 188 

100 POKEFNQ (0) , XI : POKEFNQ (Q) +C, Is ZI»1 

3 rem 168 

105 FORI ■ ITO 3 : POKEFNP { I } , 36 : POKEFNP ( I ) +C , 



13 jNEXT 

: rem 

228 

110 

POKEFNQ {0} ,Xli POKEFNQ (0) +C,1 

: rem 

118 

115 

GOSUB4 40 

:rem 

175 

120 

IFF-1THEN205 

: rem 

156 

125 

IFJO-lTHENGOStJB475:GOSUB4SO 

: rem 

177 

130 

IFJ1-1THENGOSUB4S5 : GOSUB450 

: rem 

175 

135 

I F J 2 « 1THENGOS UB 495 :GOSUB450 

: rem 

182 

140 

IFJ 3 = 1THENGOSUB50 5 : GOSUB4 SO 

: rem 

171 

145 

POKEC+4, 16 

:rem 

254 

150 

1FH-1THEN325 

srem 

164 

155 

R" INT {RND (1) *SL)+1:IFR>3THEN105 

: rem 

66 


160 POKEFNP <R> , 32 : POKEC+1 , 80+ (R* 20 ) : POKEC 



+ 4,17 

: rem 

115 

165 

IFINT (RND (1) +S1 J " lTHENPOKEFNP (R) , 

37 : P 


OKEFNF ( R) +C , 4 4 

: rem 

86 

170 

IFX< X (R) THENX (R) -X (R) ~ 1 

srem 

118 

175 

IFX>X (R) THENX (R) -X (R) +1 

srem 

123 

180 

IFY< Y (R) THENY (R) »Y(R)-1 

: r em 

123 

185 

IFY> Y (R) THENY (R) »Y (R) +1 

: rem 

129 

190 

POKEC + 4 , 16 S IFX (R) -XANDY (R) 

-YTHEN325 



: r em 

133 

195 

IFPEEK (FNP(R) ) «42THENI*R: GOTO290 




s rem 

227 

200 

GOTO105 

: rem 

97 

205 

B-XìD-Y 

: rem 

130 

210 

IFJG-0ANDJ1 -0ANDJ2 = 0ANDJ 3 = 

OTHENl 55 



s rem 

7 

215 

GOT0225 

s rem 

106 

220 

POKE1024+B+40+D ,32 

: rem 

133 

225 

IFJO-lTHENB-B+1 

: rem 

92 

230 

IFJl-lTHEND-D+1 

: rem 

93 

235 

IFJ2-1THENB-B-1 

: rem 

97 

240 

IFJ3-1THEND-D-1 

: rem 

98 

245 

IFPEEK ( 10 24+B+40*D) > 3 5THEN260 




; rem 

62 

2 50 

POKEÌ02 4+B+40*D ,35: POKE552 96+B+40 

*D,1 


5 

; rem 

251 

255 

FORO » IT02 : NE XT : G0T02 2 0 

tram 

149 

260 

P» 1 0 2 4 +B+ 4 0 +D : P 1 ■ PEE K ( P ) 

t rem 

20 

265 

IFPl>37THENl 55 

; rem 

31 


270 FORO»250TO2IQSTEP-3:POKEC+l,O: POKEC+4 
,129: POKER, RND ( 1) * 2 55 : NEXT t POKEC+4 , 16 

srem 243 

275 I FP 1 * 3 7THENPOKEP ,32: GOTO 155 : rem 162 
280 FOKEP, 32 SFORI -1T03 : IFX ( I ) -BANDY ( I ) = DT 
HEN290 srem 163 

285 NEXT : GOTO 155 : rem 236 

290 X(I)-INT(RNDU)*36) +3 : Y ( I ) -INT £RND ( 1) 
* 1 9 ) + 3 :rem 91 

295 SC-SC+10:IFSC*2000R$C-800THENGOSUB415 

: rem 24 


300 GOSOB430 : FORO» 1T04 00: NEXT: POKEFNP (I) , 
36: POKEFNP (I)+C, 13 : rem 153 

305 FORO- 2 50TO 1 4 OSTEP - 8 : PO KEC+1 , O : POKEC + 4 



, 17 :NEXTì POKEC+4, 16 

: rem 

180 

310 

SL-SL- . 2 : IFSL< 1THENSL- 1 

: rem 

173 

315 

S1-S1-.2: IFSK2THENS1-2 

srem 

72 

320 

G0T0155 

srem 

105 

325 

MN*MN-1 :GOSUB430 i POKEC+1 

, 10 0 : POKEC + 4 , 


129 * rrem 84 

330 FORQ1-1T016 : POKEFNQ ( 0 } +C , 1+RND ( 1) *8 


: rem 4 

335 NEXT S POKEC+4 ,12 8 :rem 172 

340 POKEC +4,16: POKEFNQ ( 0 ) ,32 S rem 91 
345 S2-S2-5 : r em 69 

350 I FMN > 0 THEN 4 5 srem 200 

360 PRINT" ( HOME } [ < 1 > ) " ; : FOR I » ITO 2 4 : FRINT " 

***";: NEXT :rem 105 

362 FORI » 1 9 8 4T02 0 2 3 : POKE 1,42 : rem 140 

365 POKEI+C , 8 : NEXT :rem 97 

370 POKE53280, 6 SPRINT" {WHT} (HOME} 

{ B GIU'H 16 DES } { RVS } GAME 
{ 2 SPAZI) OVER 1 ' srem 16 

375 FRINT 1 ' ( 4 GIU 1 } { 12 DES }{ RVS } GIOCHI A 
NCQRA{ SPAZI) (S/N) (SPAZI }?" srem 41 
380 FQRQl « 1 2 STO 2 54 : FOKEC+ 1 , Q I : POKEC + 4,17: 

NEXT : PGKEC+4 ,16 srem 134 

390 GETA$ :IFA$<> M S"ANDA$<>"N"THBN390 

:rem 47 

395 IFÀ$ - "S n THENCLR: PRINT 11 ( CLR] " s GOT04 

srem 190 

400 POKE53272, 21 ; POKE532 70 , PEEK (53270) AND 
239 srem 211 

410 POKE532 80 , 14 s POKE 532 81 , 6 : PRINT" (CLR } 

[ < 7> } " ; : END : rem 169 

415 MN«MN+1:SC=SC+100sGOSUB430 : rem 25 

4 20 RETURN : rem 11 8 

430 SC$-STRS ( SC ) ;MN$=STR$ (MN) : rem 209 

433 PRINT" (HOME) (YELH RVS } PUNTI : (CYN) B ; SC 
j YEL } UOMINI : { PUR ) ” ; MN$ ; ” 

{ 2 SPAZI) { 19 SPAZI) {OFF}"; 

: rem 182 

435 RETURN : rem 124 

4 40 PQ*PEEK{ 56320) : P-PQANDI 5 : P1-PQAND16 

treni 96 


441 

445 


450 

455 

460 

465 

470 

475 

480 

485 

490 

495 

500 

505 


J0-- ( ( P* 7 ) OR ( P-6) OR { P* 5 ) ) SJl»-((P«13) 

OR ( P* 5) OR ( P* 9 ) ) srem 106 

J2*- ( ( P* 11 ) OR ( P»9 ) OR { P* 10 ) ) :J3«-((F«1 
4 ) OR ( P* 1 Q ) OR ( P = 6 ) ) :F“- (Pl-0) : RETURN 


; rem £7 

X 1 =X 1 + 1 S I FX 1 > 3 4THENX1 * 3 3 :rem 150 
Zl-Zl+1: IFZ1>4THENZ1-1 : rem 59 
P0KEC+1,Z (ZI) S POKEC+4, 17 srem 105 
IFPEEK (FNQ (0) ) >34THENH»I srem 148 
POKEFNQ (0) ,X1: POKEFNQ (0) +C, 1: RETURN 


: r em 153 


POKEFNQ (0) 

-1 

RETURN 
POKEFNQ (0) 

-1 

RETURN 
POKEFNQ (0) 
1 

RETURN 
POKEFNQ (0) 


, 32 : X-X+l : IFX> 38THENX=X- 1 : H 
srem 125 
:rem 124 

,32:Y=Y+1; IFY> 2 3THENY* Y- 1 ; H 
srem 125 
: r em 125 

,32ìX»X-l:IFX<lTHENX»X+l:H- 
:tem 67 
srem 117 

,32:y-Y-1:IFY<2th£NY«Y+1:H- 


1 trem 65 

510 RETURN : rem 118 

1000 POKE56334, PEEK (56334) AND254 : PQKEl , P£ 
EK(1)AND251 : rem 226 

1010 FORI » 1 2 2 8 STO 1 2298 + 256*8: POKE I , PEEK ( I 
+40960) sNEXT srem 74 


30 SUPtJtVfC* 2J&4 


1020 FOR I*l22B8+32 # 8TOl228B+l50+32*8: READ 
XìPOKEI ,X:NEXT : rem 223 

1030 POKEl, (PEEKUIOM) :POKE56334, (PEEK(S 



6334) ORI) 

: rem 

85 

1040 

POKE53272, (PEEK (S3272) AND 24 0) +12 

: rem 

228 

1045 

POKE53270, PEEK (53270) 0R16 

: r em 

165 

1050 

RETURN 

; rem 

166 

2000 

DATA0, 0,0, 0,0, 0,0,0 

: rem 

144 

2010 

DATA56,04, 56,84, 146,40, 104 

,12 
: r em 

182 

2020 

DATA56, 84, 56,84,146,40,44, 

96 

; rem 

150 

2030 

DATA0, 0, 32,184, 32,0,0,0 

: rem 

106 

2040 

DATA4,8, 63,63,46,38,4, 21 

: rem 

190 

2050 

D ATA0 ,0,48,48,0,0,0,0 

: rem 

13 

2060 

DATAO , 0,0,0,0,255,255,170 

: r em 

214 

2070 

DATX224, 224,224, 224,224, 224,224, 

224 


: rem 215 

2080 DATAI!, 11,11,11,11, 11, 11, 11 : rem 40 

2000 DATA 170, 255,255,0,0,0,0,0 : rem 217 

2100 DATA 170 ,170, 190,100, 100, 190,170,170 

:rem 217 

2110 DATAH1, 0,192, 238, 2, 192,173, 2 

:rem 172 

2120 DATA192, 201, 255 ,208,6,173,0,102 

:rem 21 

2130 DATA76,49,234,238, 1,192, 173,1 

irem 189 

2140 DATA 10 2, 201 ,5,208,240,160,0,141 

: rem 1 5 



2160 DATAI, 192,24,173, 35,208,105,1 

: rem 174 

2170 DATA141, 35,208, 76,101,40, 14,144 

:rem 26 

2180 DATA201, 224, 48, 5, 169,15,141,14 

:rem 230 

2190 DATAI 4 4, 174 ,252,29,76,104,29 

: rem 14 8 


Sul prossimo numero 
troverete: 


£ SUPERO A8IC: il tool finale per U vostro C64; potrete 
disporre di ben QUARANTA nuove Istruzioni SASIC per 
grafica hi -rea, musica, aprite, etc. Un programma di qualità 
commerciale tutto in formato MLX. 

£ DUELLO SPAZIALE: superveloce gioco “arcade style” per 11 
V1C ed 11 C64 In formato MLX. 

_ AGGIUNGERE PERIFERICHE: panorama completo su tutto 
& ciò che potete aggiungere al vostro computer per creare un 
vero “sistema home computer” a casa vostra. 

S UN ALTRO BRANO per II Nuslc Editor del primo numero di 
SUPERVIC e, come sempre, 

S TANTI ALTRI eccitanti giochi grafici e musicali per V1C e 
C64 assetati di “SUPER”! 


SUPEEVtC* 2*4 3 1 






ne mosse dalla posizione 24 alla posi- 
zione 31* Il computer legge i DATA 
dall'Inizio fino aJ ventiquattresimo do 
IO* In corrispondenza del quale pone 
un carattere di sfondo per cancellare la 
pedina mossa; ritorna poi a II' inizio dei 
DATA, 11 legge fino alla trentunesima 
locazione in corrispondenza della qua* 
le stampa la pedina sullo shermo. 

La versione per II C64 è identica a 
quella per 11 VIC, con II campo di gioco 
più grande. 


te pedine vengono mosse; una volta 
eseguita la mossa, i contenuti delle 
matrici vengono confrontati per vede- 
re se una pedina debba essere mangia* 
ta e rimandata alla partenza. La posi- 
zione di una pedina t un numero che 
rappresenta quanti spazi sono stati 
percorsi dalla posizione di partenza. 
Ogni posizione corrisponde ad una 
certa locazione della memoria di 
schermo memorizzata nelle Istruzioni 
DATA: per esempio, se una pedina vle- 


P athway è un gioco insolito per un 
computer: quest'ultimo non è l'av- 
versarlo ma crea II gioco e vi permette 
di misurarvi contro una o più persone. 
È In versione per II VIC Inespanso e per 
Il C64, 

Le regole del gioco sono semplici: 
ogni giocatore {possono partecipare fi- 
no a tre giocatori)* dispone di quattro 
pedine contrassegnate dai numeri 
1*2,3, e 4 poste all'Inizio del sentiero, li 
primo giocatore che riuscirà a portare 
tutte e quattro le sue pedine alla fine 
del percorso sarà il vincitore. Per gio- 
care occorre premere li tasto ’FT ed il 
computer dirà di quanti spazi ci si può 
muovere; premendo il tasto corrispon 
dente al numero ài pedina scelto, que- 
sta si sposterà sul sentiero degli spazi 
corrispondenti. Se la vostra pedina ca- 
de su quella di un avversarlo, questui- 
lima viene mangiata e riportata In po- 
sizione di partenza. Se ta pedina code 
su un'altro delle proprie, quest'ultimo 
diventerà invisibile fino a che non ven- 
ga mossa. Giocando, vi accorgerete 
presto che è richiesta un'abile strategia 
per vincere. 

La versione per VIC 20 è scritta per 11 
calcolatore inespanso, quindi ricorda- 
tevi di staccare eventuali espansioni di 
memoria. 

Alcuni cenni suiti logica del 
programma 

La posizione delle pedine è immagaz- 
zinata fn matrici ed aggiornata quando 


di Cj* Tre pel 

trad ed adatt. 

di M. Crfstulb Grtuì 


Pathway varatone per C64 

1 DS ■ " { HOME } { 12 GIUM":CC-30720:ES-" 
{HOME) { 7 GIU' )" i POKE36879, 25 :rem 173 

2 DIMAS {23) : rem 39 

3 PRINT" f CLR ) ( BLK ) [ 5 GIU'Jl 2 SPA2l)2 0 

3 GIOCATORI"; :G0SUB88:IPMO2ANDMO3THEN 
3 : rem 39 

4 P-M: PRINT* (CLR} " : GOSUB56 : GOSUB50 

:rem 240 

5 VO = 36078: TN* 36875 : rem 77 

6 FORJ * ITD4 ; POKE 3 8 8 3 4 + J , 0 ; FGKB3 8 8 5 6+ J , 6 : P 

ORBI 8 9 7 B + J , 2 * NEXT : rem 5 

7 PRlNTD$+"f S GIU'H 8 SPAZI}*;: rem 94 


8 DBFFNA { X ) ■ I NT f HMD (1} * 9 ) + 1 trem 35 

9 FORJ-lT04:AA( J) -7702+J 5 POKEAA ( J) ,48+J:P 

0 KE AA { J 1 +CC # 0 ; NEXT ;rem 39 

10 FORJ- 1T04 : BB ( JJ «7724+J : POKEBB ( J) , 48+J : 

POKEBB ( J) +CC 1 6 : NEXT : rem 95 

11 FORJ * 1T04 : CC ( J ) * 7 7 4 6 + J : POKECC ( J ) ,48+J: 

PO KECC ( J } +CC , 2 : NEXT :rera 102 

12 GOSUB87 : PRINT" {HOHE} ( 2 GIU 1 }( BLK } *SPC 

t 13) "GIQCAT. 1* ; :rem 82 

13 POKE7765,32rPOKE7788,32 i rem 211 

14 GOSUB77 SPRINT" {HOME }{ 3 GIU 1 } { BLK } "SPC 

( 13) "TIRA; *;V tran 14 

15 PRINT" (HOME) { 4 GIU 1 } "SPC ( 13 } "MUOVE" ; 

:rem 52 


32 suporvic* w 



16 

GOSUB8 8 : IFM< 10RM>4THEN1 5 

:rem 

207 

17 

PRINTM: IFA (M) «OTHENPOKEAA (M ) 

,32 
: rem 

102 

18 

IFA(M) >0THENCV«A(M) :GOSUB84 

: rem 

79 

19 

IFV+AIM) >70THENPOKE8114+M,48+M: A(M) 

= 71 


: GOTO 2 4 

: rem 

73 


20 A(M) -A{M) +V: RESTOBEI FORJ-1TOA (M) : READX 
: NEXT ? POKEX ,M+4 8 : POKEX+CC , 0 :rem 93 

21 FORJ* ITO 4 : IFB ( J) < >0ANDB ( J) =A (M) THBWB { J 



) -0: POKEBB (J) , 48+J :GOSUB86 

:rem 

43 

22 

NEXT: FORJ «ITO 4: IFC ( J) O0ANDC { J) »A(M)TH 


ENC(J) *0: POKECC (J) ,48+J:GOSUB86 




:rem 

170 

23 

NEXT 

:rem 

164 

24 

GOSUB67 : PRINT" {HOME} { 6 GIU' 

} { BLU ) " 

SPC 


(13) "GIOCAT. 2" ; 

i rem 

41 

25 

POKE7 853, 32 : POKE7B74 , 32 

:rem 

210 

26 

GOSUB77: PRINTESSPC (13) "TIRA 

W ?V 




treni 

38 

27 

PRINTESSPC (13) " (GIU* }HUOVE" f 

:rem 

22 

28 

GOSUB8 8 : 1 FM< 10RM> 4THEN2 7 

:rem 

213 

29 

PRINTM! IFB (M) -OTHENPOKEBB (M) 

,32 




:rem 

108 

30 

IFB (M) >0THENCV«B(M) :GOSUB84 

:rem 

75 

31 

IFV+B (M) > 7 OTHENPOKE 8136 +M , 4 8 +M : B ( H ) 

-71 


: G0T036 

: rem 

76 


32 B(M)-B(W)+V:RESTORE:FORJ-lTOB(K) : READX 

: NEXT: POKEX ,M+48 : POKEX+CC , 6 : rem 105 

33 FORJ * ITO 4 : 1 FA ( J ) < > 0 AND A ( J > =B (M ) THENA ( J 

)*0:POREAA{J) , 48+J:GOSUB86 :rem 42 

34 NEXT i FORJ * 1T04 ; I FC { J ) < > 0 ARDO ( J ) 

ENC (J> -0 : POKECC (J) , 4 8+J :GOSOB86 




: rem 

174 

35 

NEXTJ 

: rem 

241 

36 

IFP0 3THENI2 

: rem 

135 

37 

GOSUB87 : PRINTES + " ( 3 GIU 1 )( RED } "SPC ( 13 


) "GIOCAT. 3" 

ì rem 

62 

38 

POKE 7941,32: POKE 7962, 32 

: rem 

210 

39 

GOSUB77 : PRINTES+" { 4 GIU 1 ) "SPC ( 1 3) 

"TIR 


A ";V 

: rem 

221 

40 

PRINT :FRINTD$SPC (13) "MUOVE"; 

; rem 

198 

41 

GOSUB88 : I FM< 10RM>4THEN40 

: rem 

203 

42 

PRINTM: IFC (M ) -OTHENPOKECC (M) 

,32 




: rem 

106 

43 

IFC(M) >0THENCV=C (M) SGOSUB84 

: rem 

81 


44 I FV+C (M) >70THENPOKE8158+M,48+M:C (M> *71 
: GOTO 1 2 srem 80 


4 5 C(M) =C { M ) +V : RESTOSE : FORJ = 1TOC ( M ) : READX 
: NE XT : PO KEX , M+ 4 8 1 POKEX+CC ,2 : rem 108 

46 FORJ * ITO 4 : 1 FA ( J ) < > 0 ANDA ( J ) =CMTHEN A { J ) * 

0:POKEAA{J) , 48+J : GQSUBB6 :rem 222 

47 NEXT: FORJ * 1T04 * IFB ( J) OOANDB(J) -C{M)TH 
ENB ( J) *0 : POKEBB ( J) , 4 8+J : GOSUBB6 

: r em 174 

48 NEXT: GQT012 ;rem 129 

50 DATA7729, 7730, 7731, 7732, 7733 ,7734, 7735 

,7757,7779,7801,7823,7822,7821,7820,78 
19 : rem 96 

51 DATA7818, 7817, 7816, 781 5, 7814, 7813, 7835 

,7857,7879,7880,7881,7882,7883,7884,78 
85 :rem 147 

52 DATA7886, 7887, 7888 ,7889, 7911, 7933, 7955 

,7954,7953,7952,7951,7950,7949,7948,79 
47 : rem 172 

53 DATA7946, 7945, 7967, 7989, 8011, 8012, 8013 

,8014,8015,8016,8017,8018,8019,8020,80 
21 :rem 46 

54 DATA8043, 806 5, 8087, 8109, 8131, 8132, 8133 

,8134,8135,8136 :rem 55 

55 FORJ = 1T07 0 : READX : PO KEX ,95: POKEX+CC , 5 : N 

EXT : RESTO RE: RETURN srem 224 


56 [< 4 §>]" : rem 99 

57 A$ (2) ■" [ <M> ] ( 4 SPAZ I } L [< 6 (?>]" 

:rera 32 

58 A$(3) «" [<K>] { 11 SPAZI! I <G> 1 " : rem 35 

4 SPAZI } 0 £ < 4 T>] P [<G>] 

: rem 80 
T>]{ 5 SPAZI! !<M>1 [<«>]" 


59 AS { 4 ) =" [<M>] { 

n 

60 A$ ( 5 ) = " [< 








:rem 

170 

61 

AS 

(6)** 

f f< 9 

§>)# 

(<G>] " 

:rem 

247 

62 

AS 

(7)-- 

1 [<M> ] 

( Il SPAZI} 1<G>] 

" : r em 

34 

63 

AS 

(8)-* 

M<m>) 

0[< 9 

T>! " 

: rem 

9 

64 

AS 

(9)-' 

1 C<M>1 

Ll< 9 

§>]" 

: rem 

17 

65 

AS 

(10). 

*AS (7) 



: rem 

172 

66 

A3 

(11)* 

l< 

9 T>] P 

I<G>] " 

: rem 

53 

67 

AS 

(12). 

■" E< 

9 0>]f 

[<G> 1 " 

:rem 

42 

68 

AS 

(13)* 

■A$ (7) 



: rem 

178 


69 AS(14)*A${8) :A$ (15) «A$ (9) :AS (16)-A$(10 

) :AS (17)*AS(11) : rem 143 

70 A$ ( 1 8 ) - " ( 10 SPAZI) [<M>] [ <G> ]" 

:rem 83 

71 AS ( 1 9 ) ■ " { 10 SPAZI) [<H>] [<G> J 

( 4 SPAZI}[< 4 8>) w : rem 229 

72 A$ ( 2 0 } ■ " { 10 SPAZI) [<M>] L[< 3 §>]§ 

[ 4 SPAZI ) [<G>1 n : rem ~192 

73 AS (21) ■" { 10 SPAZI) 10 SPAZI) 

t<G>]" : rem 80 

74 AS (22) ■" { 11 SPAZ I } [ < 5 T>]P 

{ 4 SPAZI) [<G>]” ” : rem 170 

75 A${23)«"{ 17 SPAZI) [< 4 T>]" : rem 148 

76 FORJ * ITO 1 9 : PRI NTAS t J) ;NEXT:FORJ=20TO23 

:PR1NTAS (J) ; :NEXT: RETURN : rem 0 

77 PRINTDS + " { 6 GIU 1 } PREMI F7"; : rem 109 

78 PRINTDS+" { 7 GIU')PER TIRARE " ; 

: rem 51 

79 IFPEEKU97) -63THEN81 :rem 84 

80 GOT079 : rem 17 

81 V=FNA(1) *POKE198,0 :rem 186 

8 2 FORJ * 1TOV : POKE8 0 4 8 , 4 8 + J : POKE 3 87 6 B , 0 : FO 

RT* ITO 1 0 0 : NEXT : POKEVO ,15: POKETN , 2 0 0 : PO 
KEVO , 0 : rem 132 

83 NEXT: RETURN : rem 196 

84 I FCV> 7 0THENC V» 7 0 : rem 165 

8 5 RESTO RE : FORJ - 1TOC V : READX : NEXT : POKEX , 9 5 

: POKEX+CC, 5: RETURN : rem 21 

8 6 POKEVO , 1 5 : PO KETN ,250: FORT* ITO 7 0 0 : NEXT : 
POKEVO , 0 : RETURN : rem 188 

87 POKEVO, 10 : POKETN, 128: FORT* 1TO200: NEXT: 

POKEVO, 0: RETURN srem 183 

88 GETMS :ON~ (M$*"")G0T088:M=VAMM$) : RETUR 

N : rem 52 



SUPERVIC Zi 34 33 



Pathway versione per VIC 20 


100 DS“ " ( HOME J ( 12 GIU' ] " :CC-5* 27 2 : E$ - " 
{HOMEH 7 GIU' }": POKE 53281,1: POKE 5328 
0,14: SO-CC : rem 108 

110 DIMAS (23) : FORT-SOTOSO+24 : POKET , 0 : NEXT 
: POKESO+24 , 1S : POKESO+5, 34 : POKESO+6 , 24 
4 * :rem 161 

115 PRINT" {CLR} { 7 GIU'H 15 DBS } PATHWAYS 
" ; rem 150 

120 PRINT" [BLK}{ 4 GIU'H 10 DBS) 

f 2 SPAZI ) 2 O 3 GIOCATORI?" : rem 238 
125 GQSUB960: IFM02ANDM03THEN125 

:rem 13 

130 P-M: PRINT" {CLR } " s GOSUB6 50 :GOSUB590 

treni 1S5 

140 VO- 36878 :TN*36875 : rem 173 

150 FORJ ■ 1T04 : POKE 1 104 +CC + J , 0 S POKE 114 4 +CC 
+J , 6 : PORRI 1 B4+CC+J , 2 : NEXT : rem 172 

160 PRINTDS+" { 8 GIU*}{ 6 SPAZI}*? 

srera 190 

170 DEFFNA (X ) - 1 NT ( RND {1) * 9) +1 : rem 131 

180 FORJ-1T04:AA(J) - 1104 +J : POKEAA (J) ,48+J 
: POKEAA ( J } +CC , Q ; NE XT J : rem 199 

190 FORJ - ITO 4: BB ( J ) «1144 + J ; POKEB B { J ) ,48+J 
: PO KEBB ( J ) +CC , 6 : NEXTJ ? rem 216 

200 FORJ * ITO 4 : CC (J) «1184 +J: POKECC { J ) ,4 8+J 
: POKECC ( J ) +CC , 2 : NEXTJ : rem 214 

210 GOSUB 9 50 : PRINT" {HOME } { 2 GIU'}{BLK}"S 
PC ( 1 3 ) "GIOCAT * 1 11 ? : rem 177 

220 POKE1163 , 32 : POKE 1 1 6 3+CC , 0 : POKE1203, 32 
: pokeI 203+cc r 0 :rem 92 

230 GOSUB850 SPRINT" {HOME }{ 3 Giy*HBLK}"S 
PC f 13) "TIRA V : rem 51 

240 PRINT" {HOME }{ 4 GIU * } { BLK } " SPC (13) "MU 
OVE"; :rem 244 

250 GOSUB960 : IFM< 10RM> 4THEN240 : rem 94 
260 PRINTMS IFA (M> -OTHENPOKEAA (M) ,32 

srem 150 

270 IFA (H) >0THENCV-A(M> : GOSUB920 s rem 174 
280 IFV+A (M> > 6 5THEN PO (CE 1 6 9 5+N , 4 8 +M : POKE 1 6 
95+M+CC , 0; A (H) »66: GOTO 330 : rem 123 

290 A(H}«A(M) +V : RESTORE ; FORJ - 1TOA { M) ; READ 
X : NEXT : POKEX ,M+48 : PGKBX+CC , 0 : rem 150 
300 FORJ * ITO 4 S I F B ( J ) < > 0 AND B ( J ) -A(H>THENB( 
J) -OsPOKEBB(J) ,48+J: GOSUB 9 4 0 : rem 138 
310 NEXT : FORJ- 1T04 : IFC (J)OOAHDC (J) -A (M) T 
HENC ( J) -0 ; POKECC (J) , 48+J :GOSOB940 

: rem 9 

320 NEXT : rem 212 

330 GOSUB950:PRINT" {HOME} { 2 GIU 1 } 

{ 10 DES } { BLU } " SPC { 13 } "GIOCAT • 2" ; 

:rem 102 

340 POKE 1173,32: POKE 1 173 +CC , 6 ; POKE 1213, 32 
: POKE 1213 +CC , 6 :rem 111 

350 GOSUB850 SPRINT" [HOME H 3 GIU'} 

{ 10 DES } {BLU} "SPC (13) "TIRA ";V 

: rem 231 

360 PRINT" {HOME} { 4 GIU 1 } { 10 DES}"SPC(13 
} "MUOVE"; : rem 137 

370 GO3UB960 ; IFM< 1QRM>4THEN360 srem 100 
380 PR1NTM: IFB(M) « OTHENPOKEBB (M) ,32 

rrem 156 

390 IFB(M) >0THENCV-B (M) :GOSUB920: rem 179 
400 IFV+B (M) >65THENPQKE17 35+M , 4 B+M: POKE 17 
35+M+CC,6:B(M} -66:GOTQ450 ;rem 118 
410 B(M) -B (M} +V : RESTORE: FORJ- ÌTOB(M) :READ 
X : NEXT : POKEX , M+4 B : POKEX+CC , 6 1 rem 153 
420 F0RJ-1TO4: IFA [ J) < >0ANDA { J) -B {M) THENA [ 
J} -0: POKEAA (J) , 48+J : GOSUB94Q : rem 137 



430 NEXT : FORJ - 1T04 : IFC ( J) OOANDC (J) -B(M)T 
HENC(J) -0: POKECC (J) , 4 8+J :GOSUB94Q 




: rem 

13 

440 

NEXTJ 

: rem 

33 

450 

IFPO3THEN210 

; rem 

231 

460 

GOSUB 9 50 : PRINT" { HOME } { 

2 GIU 1 } 



{ 19 DES}{RED} M SPCU3>" 

GIOCAT- 3" 




treni 

50 

470 

POKE 118 2,32: POKE 1 182 +CC 

i 2 s POKE 1 22 2 

,32 


S POKE 1 2 2 2+CC , 2 

: rem 

107 

480 

GOSUB 8 50: PRINT" {HOME} { 

3 GIU 1 } 



{ 19 DES} {RED} "SPC (13}" 

TIRA " ; V 




: rem 

237 

490 

PRINT" (HOME} { 4 GIU 1 } { 

19 DES } f RED} "S 


PC (13) "MUOVE"; 

: rem 

174 

500 

GOSUB 9 60 : 1 FM< ÌORM > 4THEN 4 90 : rem 

99 


510 PR I NTM : I FC ( M ) - OTHENPOKECC { M ) ,32 

: rem 154 

520 IFC(M) >0THENCV-C (M) : GOSUB920 : rem 176 
530 IFV+C [M) > 6 5THENPOKE1775+M , 48+M: POKE 17 
75+M+CC , 2 : C ( M ) * 66 s GOTO? 10 :rem 122 

540 C (M)-C(M)+V: RESTORE S FORJ- ÌTOC(M) : READ 
X : NEXTJ : POKEX , M+ 4 8 : POKEX+CC , 2 

: rem 230 


550 FORJ - 1T04 ; IFA ( JK >0ANDA ( J) -C (M) THENA ( 
J) *0: POKEAA <J) , 4 8+J sGOSUB940 ; rem 142 
560 NEXT: FORJ -1TD4: IFB{J) OOANDB(J) -C(M)T 
HENB(J) -0 : POKEBB { J) , 4 8+J S GOSUB940 




: rem 

13 

570 

NEXT: GOTO 2 10 

: rem 

225 

580 

GOTO 580 

: rem 

115 


590 DATA 1149,1150, 1151,1152,1153,1154 , 115 
5,1195,1235,1275,1276,1277,1278,1279 

srem 44 

600 DATA1280, 1281, 1282, 1283,1323,1363, 140 
3,1443,1442,1441,1440,1439,1438,1437 

srem 22 

610 DATA1436, 1435, 1434, 1433,1432, 1431,147 
l v 1511, ISSI, 1591 ,1631, 1671,1711, 1712 

srem 18 

620 DATA1713, 1714, 1715,1716,1717,1718,171 
9,1720,1721,1722,1723,1724,1725 

: rem 54 

630 DATA1726,1727, 1728, 1729,1730, 1731,173 
2,1733,1734,1735 : rem 86 

64 0 FORJ - 1T06 5 S READX : POKEX ,95: POKEX+CC , 5 S 
NEXTJ; RESTORE: RETURN : rem 94 

650 ASU)*" {< 4 8>) " : rem 147 

660 A$ ( 2) »" [<M> J ( 4 SPAZI )L[< 6 P>J" 

srem 146 

670 A$(3)-"I<M>] { 11 SPAZI } J<G>} " 

:rem 83 
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680 

*$(4>-"[<M>] ( 4 SPAZI IO I< 4 Y> 1 P 



[<G>] " 


;rem 

208 

690 

AS ( 5 ) * " [< 4 T>]{ 5 SPAZI} [<M>] L 



[< 7 P>]" 


: rem 

211 

700 

A$(6)-"E 

10 SPAZI} [ <N> 1 { 

9 SPAZI) 



[<G>] " 


: r em 

83 

710 

AS(7)-"{ 

11 SPAZI) [< 7 T> 1 P £<G>] " 





; rem 

240 

720 

AS(8)-"{ 

18 SPAZI) [ <M> ) 

[<H> ] " 





: rem 

99 

730 

AS (9) ■" ( 

7 SPAZI} [< 11 P>] 8 [<H>] 

H 




; rem 

253 

740 

A$(10)-"{ 

6 SPAZI } [<H>] { 

13 SPAZI) 



l <G> ] " 


: rem 

127 

750 

AS (II) -"{ 

6 SPAZI) [<M>] 

0[< 11 Y> ì 

** 




: rem 

136 

760 

AS {12} «" { 

6 SPAZI} [<M>] 

[<G>5 M 





: rem 

131 

770 

AS ( 13} ■" { 

S SPAZI } [<N>] 

C < K > ) 



{ 2 SPAZI}" 

: rem 

151 

780 

AS ( 14) -"{ 

6 SPAZI } [<«>] 

[<G>r 





: rem 

135 

790 

A5(15}-"{ 

6 SPAZI }[<M>) 

[<G>] 



{ 23 SPAZI] [< 4 $>] " 

: rem 

25 

800 

AS ( 16} •" { 

6 SPAZI) [<M>] 

L [ < 22 @>ie 


{ 4 SPAZI} [<G>] " 

; rem 

32 

810 

AS ( 1 7 } ■ " { 

6 SPAZI } [<M>] { 

29 SPAZI) 



1<G>1 " 


; rem 

132 

820 

AS118>-"{ 

7 SPAZI} (< 24 

T> ) P 



{ 4 SPAZI} [<G>] " 

: rem 

247 

830 

AS ( 19) “" [ 

32 SPAZI)1< 4 

T>3 " : rem 

200 

840 

FORJ“lT019i PRIMTAS (J) : NEXT: PRINT" 



{HOME}":RETURN 

; rem 

192 

850 

PRINTOS+" 

{ 7 GIU’ } PREMI 

F7" ; : rem 

173 

860 

PRINTOS+" 

{ 8 GIU’ }PER TIRARE"; 





: rem 

115 

870 

IFPEEK (197) «3THEN890 

: rem 

133 

080 

GOSUB970: 

GOTO870 

: rem 

210 

890 

V-FNA(l) : 

POKE198 , 0 ; POKESO+1 , 20 





: rem 

231 


900 FORJ-1TOV:POKE1803, 48+J: POKE1803+CC ,0 
: POKESO+4 r 17 : FORT" 1TO10 : rem 154 

910 POKES0+ 1 , J* 10 : NEXT : NEXT: POKESO+4 p 16 ; R 
ETURN : rem 209 

920 IFCV>65THENCV«65 :rem 220 

930 RE5TORE : FORJ m 1TOC V : RE ADX : NEXT : POKEX , 9 
5 : PQKEX+CC , 5 : RETURN i rem 68 

940 POKESO+ 1 ,10; POKESO+4 » 3 3 ; FORT* ITO 7 00 : N 
EXT; POKESO+4, 32; RETURN i rem 254 

950 POKESO,80 :POKESO+l, 80: POKESO+4, 33: FOR 
T- ITO 200; NEXT : POKESO+4 , 3 2 : RETURN 

: rem 160 

960 GETMS :ON- <M$» " " ) G0TO960 ;M«VAL {M$ } : RET 
URN : rem 14 6 

970 Dl*0 : FORT* 1696T01699 : Zl«PEEK (T) :Dl-Zl 
+D 1 : NEXT : I FD 1 ■ 2 0 2THENW I * 1 : GOTO 1010 

:rem 99 

980 D2*0:FORT«1736TOl739: 22»PEEK(T) :D2-22 
+D 2 : NEXT ; 1 FU 2 ■ 20 2THENWI * 2 : GOTO 1010 

:rem 97 

990 D3*0 : FORT" 1776T01 779 : Z3*PEEK (T) :D3*Z3 
+D 3 : NEXT ; X FD 3 ■ 2 0 2THENWI * 3 : GOTO 1010 

:rem 113 

1000 RÉTURN : rem 161 

1010 PRINTMCLRH 12 DES }GIOC AT - * ; WI ? " VI 

NOE" :rem 54 

1020 PRINT" { 2 GIU'H 10 OESjGIOCHI ANCOR 
A S O N?” : rem 110 

1030 GETAS ; 1 FA$ < > ” S " AND A? < > " N " THEN 1030 

: rem 127 

1040 I FAS * " S "THENRUN : rem 177 
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di A. Au 

trad. ed «dati, di F. Sartina 


Che al può fare ae al incappa In un 
LO AD ERROR? è possibile recupe- 
rare Il programma? Questo artico- 
lo parla del fastidioso problema 
degli errori nel caricamento da na- 
stro. Inoltre vi apiega una tecnica 
per caricare I programmi a velociti 
doppia» 

Q uando salvate un programma, ìl 
VIC e il C64 lo registrano due volte 
sul nastro. Quando por lo caricate, la 
prima versione viene memorizzata nel 
computer e confrontata con la secon- 
da. Se esse non coincidono perfetta- 
mente verrà segnalalo un LO AD ER- 
ROR. 

Mei caso che ciò si verifichi, provate a 
listare il programma: se il listato scorre 
fino alla fine senza che appaia nulla di 
insolito o dì estraneo, è probabile che 
il programma sìa recuperabile. 

Ma attenzione: non dovete ancora bat- 
tere ROM, se non volete che vada di- 
strutto. Il problema è che I puntatori 
dell'area di memorizzazione delle va- 
riabili sono da inizlalizzare, Per far ciò 
4 necessario trasferire II contenuto del- 
la locazione 83 1 in 45, 47 e 49 e il con- 
tenuto di 632 in 46, 46 e 50. Battete 
quindi: 

POKE 45, PEEK<8 31) : POKE 47. 
PEEKJB31) : POKE 49. PE£K<831) 
POKE 46. PEEK(832) : POKE 48. 
PEEK(832> : POKE 50. P£EK{832) 
Ora provate a chiedere ?FRE(0). Se la 
RAM libera è diminuita in proporzione 
all'occupazione di memoria del pro- 
gramma. quest'ultimo sarò pronto per 
fuso , Battete RUM ed esso funzionerà. 
Se tuttavia le cose non vanno per il ver- 
so giusto, dò è probabilmente dovuto 
a qualche valore errato nelle POKE 
che avete effettualo. Premete 
RUN/STOP e RESTORE e Ravvolgete 
la cassetta, battete OPEM l e fate parti- 
re Il nastro: dopo aver letto la "testata" 
del programma» esso si fermerà. Ora le 
locazioni 831 e 832 dovrebbero conte- 
nere l valori corretti, per cui battete 
nuovamente te POKE e riprovate. 
Spiegazione 

Quando 11 VIC e 11 C64 caricano un pro- 
gramma, lo memorizzano nella RAM 


Basic Iniziallzzendo i puntatori in pagi- 
na zero che indicano la sua lunghezza. 
Ma tale inizializzazione avviene solo 
dopo che il programma 4 stato carica- 
to e controllato. Se si verifica un 
* LOAD ERROR, i puntatori non vengo- 
no aggiornati: perciò, sebbene a que- 
sto punto sìa possibile listare II pro- 
gramma, Il computer è convìnto di 
non aver nulla In memoria. Se ora si 
batte RUM» le variabili vengono menno- 
rizzate nella stessa area del program- 
ma e lo distruggono. 

Le POKE che abbiamo elencato pon- 
gono nel puntatori I valori corretti, che 
si trovano nel buffer del registratore. 
Le locazioni 829-830 e 831-832 con- 
tengono rispettivamente l'indirizzo 
(byte basso e byte alto) dell'inizio dei 
programma e quello dell inizio delle 
variabili, che corrisponde alla fine del 
programma. 

La procedura indicata funziona solo se 
Il programma è stato caricato corretta- 
mente: se esso 4 incompleto, Il meto- 
do non funzionerà. 

Fortunatamente molti errori di carica- 
mento si risolvono ri memori zzando i 
puntatori, per cui la nostra tecnica sì ri- 
vela molto utile. 

Caricamento In metà tempo 

Per caricare un programma di 8K sono 
necessari due minuti e mezzo. Dato 
che II computer prima carica il pro- 
gramma e poi lo controlla, la memoriz- 
zazione vera e propria avviene solo nel- 
la prima metà di questo tempo. L’im- 
portanza del controllo è dubbia, In 
quanto esso non corregge eventuali er* 
rori scoperti: tutto ciò che fa è segnala- 
re 7LOAD ERROR. Generalmente il ca- 
ricamento dei programmi in linguag- 
gio macchina può essere Interrotto a 
metà, dopo di che si può dare il RUM (o 
la SVS di partenza) senza problemi, da- 
to che tali programmi non necessitano 
di puntatori in pagina zero. Per ì pro- 
grammi in Basic, invece, è necessario 
prestare piu attenzione, se si vuol farli 
"girare" dopo metà tempo. Dato che I 
puntatori vengono fniziaJlzzati solo al- 
la fine del caricamento, è necessario 
aggiornarli battendo manualmente le 


POKE che abbiamo visto oppure inse- 
rendole all'Interno del programma. 
Vediamo appunto come preparare un 
programma che possa funzionare do- 
po la metà del caricamento: sarà suffi- 
ciente aggiungere all'inizio del listato 
due linee contenenti le solite POKE, 
accertandosi che siano le prime ad es- 
sere eseguile, e salvare il programma. 
Ora* se si batte RUM dopo aver Inter- 
rotto a metà il caricamento, la prima 
cosa che II programma farà sarà ag- 
giornare i puntatori: non 4 più necessa- 
rio attendere che lo faccia 11 computer 
alla rine del LOADIMG. Il risultato è 
che il programma può essere caricato 
In metà tempo. 

Questa procedura può essere utilizzata 
per abbreviare il caricamento di qual- 
siasi programma. È consigliabile usare 
ti contatore sul registratore per deter- 
minare la metà del programma» e fer- 
mare il nastro poco dopo dì essa pre- 
mendo RUN/STOP e RESTORE. 

Per concludere, un paio dì consigli. Se 
vi capita spesso di avere problemi col 
vostro registratore» provate a cambiar- 
gli posizione: ricordatevi infatti che la 
trasmissione dei dati è sensibile ai 
campi elettrici. Per esempio, è consi- 
gliabile tenere il cavo di connessione 
del registratore lontano dalla parte po- 
steriore del televisore, che 4 una forte 
sorgente di campo elettrico. Inoltre, 
verificete sempre i vostri programmi 
dopo averli salvati. 

Inoltre, è sempre buona norma preme- 
re il tasto STOP del registratore quan- 
do si ha finito di caricare un program- 
ma» In quanto la continua pressione 
del capstan su una parte specifica die 
nastro magnetico ne può cuasare il de- 
terioramento. Ogni tanto 4 pure buona 
abitudine pulire la testina di registra- 
zione: con un batuffolo dì cotone im- 
bevuto di acool denaturato strofinatela 
con delicatezza fino ad asportare tutti I 
residui di nastro magnetico. Avrete 
sempre II registatore in perfette condi- 
zioni se ogni tanto (una o due volte 
all'anno) provvede rete anche alla sma- 
gnetizzazione della testina con gli ap- 
positi demagneti zzato ri che si trovano 
In commercio. 
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di G* R. Anderson 

trad* ed adatt. di F. Sarcina 


D AC MAX è un programma che Insa- 
li gna la matematica divertendo. 
Orarie ai suol nove livelli di difficoltà* 
esso è adatto ad esercitare nell'uso del- 
le quattro operazioni bambini di età 
comprese tra I sei e I dodici anni. Me 
presentiamo qui due versioni: la prima 
per il VIC 20 sema espansioni di me- 
moria e la seconda per II C64. 

Per tenere sveglio rinteresae di un bam- 
bino. un programma educativo deve 
essere divertente da usare. PACMAT 
mostra un personaggio ispirato al fa- 
moso videogioco racman": egli con- 
ta sulle risposte corrette del giocatore 
ai problemi che il computer propone, 
per riuscire a sfuggire ad un fantasma 
che lo insegue per mangiarlo* 

Il programma inizia chiedendo II nome 
dei giocatore* il tipo di operazione che 
si vuole effettuare (addizione* sottra 
zlone* moltiplicazione o divisione) e il 
livello di difficoltà con cui sì vuoi e co- 
minciare. Quindi viene mostrato sullo 
schermo II primo problema attenden- 
do la risposta del giocatore. 

Ogni risposta esatta frutta 10 punti e fa 
avanzare E! Pscmat di un passo verso la 
sua preda, il fantasma, tuttavia, lo Inse- 
gue a soli tre passi di distanza. Dopo 
15 risposte esatte II Pacmat mangia la 
preda e I ruoli si Invertono: il Pacmat 
ìnsegue II fantasma attraverso lo scher* 
mo. e alla fine lo cattura ottenendo un 
bonus di 100 punti. A questo punto il 
livello di difficoltà viene incrementato 
di un'unità e II programma mostra 
nuovi problemi. 

Il fantasma, invece, avanza se il gioca- 
tore dà una risposta sbagliata: in que- 
sto caso, innanzitutto viene mostrata 
la risposta esatta, poi II fantasma rag- 
giunge Il Pacmat e se lo mangia. 06 
provoca la perdita di 50 punti e il ritor- 
no al livello di difficoltà inferiore* 

Se. in risposta a un problema* invece 
di un numero si batte una Q* Il gioco 
termina. Viene quindi mostrata la ta- 
bella del risultati, contenente il nume- 
ro di problemi esaminati, le risposte 
esatte* quelle errate e la percentuale di 
risposte giuste sul totale. A questo 
punto 11 giocatore pu6 decìdere se ri* 


cominciare il gioco oppure smettere, 
PACMAT funziona perfettamente sui 
VIC 20 ìnespanso. Dato che vengono 
usati caratteri rideflnlti, dovrete rimuo- 
vere le vosie eventuali espansioni dì 


memoria: queste, Infatti* alterano lo 
mappa di memoria e quindi anche la 
zona in cui vengono memorizzati 1 ca- 
ratteri* Messun problema* Invece* nella 
versione per 11 C64* 


Descrizione dei pro0rminiM 

Ecco un'analisi dèi programma (nella versione per VIC 20 

10-35 Inlzlalizzazlone e subroutlnes di ritardo. 

40-50 Controllo della risposta al problema. 

55*60 Stampa dei titoli lettera per lettera. 

65-145 Generazione del problema e stampa nel formato appropriato. 

150-160 J! fantasma raggiunge 11 Pacmat, Sì generano gli effetti sonori, 
si sottraggono 50 punti e si riduce 11 livello di difficoltà. 

165-235 li Pacmat raggiunge fa preda e Ìnsegue 11 fantasma. Bonus di 
100 punti e incremento del livello di difficoltà. 

240-255 Movimento del Pacmat e del fantasma. 

260*275 Stampa del livello e dei punteggio. Cancellazione della do- 
manda precedente dallo schermo. 

280-300 Stampa dei risultati alla fine del gioco. Test per ricominciare il 
gioco e smettere. 

305-345 Caratteri speciali* 

350-385 Titoli, 

390-445 Ingresso dei dati: nome del giocatore, tipo di operazione e li- 
vello di difficoltà. 
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Pacmat versione per VIC 20 


IO PRINT" {CLR}" S POKE36878 , 15:S-36874 :SH*7 
702:CM-38422:L«l:BC-27 :tera 240 


15 POKE52, 29: POKE56, 29:S$-" {RVS } {HOME} 


{ 23 GIU' )":CB-36879 stara 
20 JS-"{< 22 1> J " :P»3:GOTO305 stara 
25 FORT- 1TO350 : NE XT : RETURN stani 
3 0 FORT- 1T04 0 : HBXT : RETURN : t em 
35 FORT- 1T080:NEXT: RETURN stara 


40 D-VAL(ANS) sIFASC(ANS) -81THEN2B0 . 


233 

66 

222 

166 

175 


trem 223 

45 IFD«CTHENP-P+l:R-R+l:M-H+l:SC-Se+lO:FO 
KES+2 , 220 : FORTUITO?; HEXT: POKES+2, 0 :GOT 
0240 :rem 196 


50 M-M+1:W-W+1: PRINTLEFTS {SS, 1U2*(G“3) )S 
PC { 11 -LEN (C$) ) " { RED } *C trem 32 

52 POKES , 200 :GOSUB25 : POKES , 0 : GOTO 2 50 




trem 

234 

55 

FORI -1TOLEN (A$) sPRINTMIDS (A$, 

U) ; 

:POK 


ES , 2 50 S GOSUB30 : POKES , 0 S NEXT ; A$ - " ” 




trem 

21 

60 

RETURN 

trem 

70 

65 

PR-PR+ls A-INT (RND (1) * (5*L) ) +1 

: rem 

36 

70 

B-INT (RND (1) * ( 5*L) ) -fi : IFB>ATHENA«A+B 



: rem 

239 

75 

E-A»B: AS-STRS (A) 3 BS-STRS (B) :E$-STR$ (E) 



: rem 

70 

80 

IFQ- 1THENC-A+B : X-43 SGOTOIOO 

: rem 

77 

85 

IFQ-2THENC-A-B:X»45: GOTO 100 

trem 

87 

90 

I F0- 3THENC • A : GOTO 1 2 0 

: rem 

175 

95 

C-EsX-88 

:rem 

114 

100 CS-STRS(C) s PRINTLEFTS (SS, 8) SPC (11 

-LEN 


(Mi)* 

:rem 

196 


103 PRINTLEFTS ( SS , 9) SPC ( 9 -LEN ( BS ) } " ";CHR 
$ (X) B H {GIU 1 } ( 3 S IN J { 3 F}" : rem 187 
110 PRIHTLEFTS {SS, 11) SPC(10-LEN (C$) ) MHPU 
TAHS : I FAN$ ■ " "THENllO : rem 91 

115 D-VAL(AN$> ;GOTO40 trem 214 

120 PRI NTLEFTS { 5$ , 13 ) SPC ( 9 ) * { 8 SPAZI)" 

: rem 123 

125 PRIHTLEFTS (SS ,11) SPC (TP 1 9 SPAZI } " 

: rem 124 

130 PRIHTLEFTS (SS ,12) SPC (9) " [<Z>H 4 *) 
{SU}( 5 Sm}-“ : rem ^167 

135 PRIHTLEFTS ( SS *11} SPC ( 9 - LEN ( E$ ) ) E ; B 

: rem 195 

140 PRINTLEFTS (SS , 13 ) SPC ( 10-LEN (CS ) ) : IHPU 
T* { RVS ì " ; AN$ : I FAN $ ■ " " THEN 140: rem 244 
145 GOTO40 :rem 55 

150 FQR I • 1 30TO2 54 : POKES + 2,1: GOSUB 30 ; HE XT : 

POKFS + 2 , 0 : rem 110 

155 POKECM+P , 2 : GOSUB 3Q : PO KECM+P , 5 : GOSUB 3 0 

trem 66 

160 POKES 4 3 ,220: POKESM+P , 69 : FORI -1TO320 : N 
EXT trem 223 

165 POKESM+P ,64: FOR I - 1T03OO : HEXT : r em 3 
170 POKESM+P # 3 2 : POKBS+ 3,0: SC* SC- 50 : 1 FSC< 0 
THENSC-0 irem 27 

175 L-L-1:IFL-0THENL^1 srem 59 

180 P«3 :M“0 SPRINT" {CLR} " : GOT04 4 5 : rem 251 
185 POKESM+CM-1) f 32 : FORI ■ 1T06 s POKECM+M , 3 : 
POKESM+H , 60 : POKECH+P , 5 : POKES+2 , 200 

:rem 101 


190 POKESM+P, 62 : GOSUB 30 : POKESM+P, 58 :POKEC 
M+M , 6 : POKESM+M ,61: GOSUB 30 : r em 182 

195 POKESM+M ,32: POKESM+P ,32: POKES+2 , 0 : P “P 

•1 :M»M- llHXXT ;rem 94 

200 FORI ■12T09STEP- 1 : FOKECM+I , 5 : POKESM+I , 
6 2 : POKECM+9 , 6 : POKESM+ 9 ,60: GOSUB 30 

:rem 146 



205 POKES+2 , 200 : POKECM+9 , 3 : POKESM+I , 58 

:rem 6 

210 GOSUB30:POKE$+2,0: POKESM+I, 32 :NEXT 

: reni 114 

215 FORI ■ ITO 5 : PRINT" ( HOME } { RVS ){ G I U * ) 

{RED} "TAB<7) "*"100**": PO KES+2, 220 :GOS 
UB2 5 : POKES + 2 , 0 t rem 182 

220 PRIHT" {HOME} {GIU 1 M RVS } "TAB ( 6 ) * 

{ 8 SPAZI }*;GOSUB25:HEXT:L*L+l 

: rem 66 

225 SC“SC+ 1 0 0 : P* 3 : M« 0 : BC *BC+ 1 : I PBC > 31 THEN 
BC«27 :rem 211 

230 POKECB , BC : PRIHT" {CLR} {BLU } " i PRIHTLEFT 

$ (SS , 4 ) JS trem 99 

235 POltE36869,255;PRINT" [HOME} {GIU 1 } {PUR} 
{ 4 SPAZ I }???????? ?7????{ RVS ) { REO } S" 

: rem T23 

240 POKESM+ ( P“ 1} ,32:POKECM+P, 5: POKESM+P, 5 
9:GOSUB25: POKESM+P, 58 : rem 81 

24 5 I FSM+P* $M+ 1 BTHENl 8 5 trem 131 

250 POKESM+ (M~ 1) , 32 : POKECM+M , 2 : POKESM+M , 6 
1 : GOSUB 2 5 : POKECM+M , 6 : POKESM+M , 60 

: rem 8 

255 IFPEEK ( SM+M) -PEEK (SM+P) THENl 50 

trem 76 

260 PRINTLEFTS (SS, 17) SPC (6) "(CYH) LIVELLO: 

"L* (BLU } " : rem 32 

265 PRINTLEFTS (SS, 18) JS trem 68 

270 PRIHTLEFTS (SS, 20)" "N$":*SC" PUNTI" 

: rem 105 

275 PRIHTLEFTS (SS ,B) SPC (8) "{ 4 SPAZI} 
{GIU'H 4 S1H}{ 4 SPAZI} { 2 GIU 1 ) 

{ 5 S IH } { 8 SPAZI }":G0T065 irem 239 
280 PO KB 3 6 3 6 9 , 240 : POKECB, 254 : PRIHT" {CLR} 
{RVS) {GIU* ) {DES} RISULTATI DI "H$ , " 
{OFF} { 2 GIU 1 } { DES } PROBLEMI : " PR- 1 

: rem 195 

285 PRIHT" { 2 GIU* } {DES } {GRHjRISP, ESATTE 
:*R,"{ 2 GIU 1 } ( DES } { RED } RI SP - ERRATE: 
"W,*( 2 G I U 1 } ì DES } { BLK ) VOTO : " I HT ( 10 0/ 
(PR- 1) ) *R*%" tre» 9 

290 INPUT" ( 2 GIU 1 } { DES } GIOCHI ANCORA (S/H 
)*;AS :rem 214 

295 IFA$-"S"THBN400 :rem 43 

300 PRIHT" {CLR}" : FORt-lTOS : PRIHT* {GIU 1 } 

{ 2 DES } ( RED }C I A O ! I l":GOSUB25:N 
EXT: END : rem 70 

305 FORF * 7 6 3 2T07 6 7 9 ! RE ADA : POKEF , A : HEXT 

: rem 128 


38 sopebvk- 2 tt* 



310 DATA24, 60,110, 126,126,126,60,24 

:rera 215 

315 DATA56, 124 ,95, 249, 224 ,248, 127,54 

sten 48 

320 DATA60, 126, 255, 219, 255, 255, 169, 169 

: rem 146 

325 DATA60, 126. 255,219,255,255,90,180 

3 rem 89 

330 DATA120, 116 ,30*14,30,124,120,0 

3 rem 148 

335 DATAO» 0 ,0,14,14,14,0,0 : rem 8 

340 FORK-7424TO7431:READA8POKBR,A:NEXT 

srem 122 

345 DATA» ,,,,»» 0 :tem 26 

350 POKECB, 250 : POKE 3 68 6 9, 25 5: PRINTLEFTS (S 
8*11) " {' 5 DBS } ( BLU ) P (GRN)A(RED) C 
f BLU }M (BLK)A (GRN)T" : rem 109 

355 READPSIFF--1THEN375 s rem 119 

360 POKES+2 ,P8GOSGB30;POKES*2» 0 SGOSUB308G 
0TO355 :rem 169 

365 DATA195* 209*219, 225» 225*225*225 

: rem 2 SO 

370 DATA219, 219, 219, 209, 219, 209, 195,-1 

3 rem 139 

375 PORI“0TO15s PRINTMIDS (SS, 2, 10)SPC(I) " 

1 2 SPAZI) {CYN)«(SINHRED)< (GBH)3")8 
GOSUB 3 5 s rem 7 

380 PRINTMIDS <S$,2, 10) SPC (I>"( 2 SPAZI) 
(BLU)<(SIN) (PUR)- {GRU) J* 8 POKKS+2, 200 
: GOSUB35 : POKES+2 , 0 :NEXT 8 rem 174 

385 PRINTMIDS (S$, 2, 10) SPC ( 15) “ { 8 SPAZI ) 

« s rem 191 

390 POKECB, 254 8 POKE3 6869, 2408 PRINT" (CLR) 

{ 3 GIU* ) (BLU)* :A$" "COME TI CHIAMI" sG 
OSUBS5 trem 242 

395 PRINTLEFTS (SS, 9) SPRINT" {GRU}" 8 INPWTHS 
SPRINT" (BLU)" 3 rem 57 

400 PRINT" (CLR) "LEFTS (SS » 6) :A$“"IN COSA V 
UOI " : GOSUB55 3 rem 181 

405 PRINTLEFTS (S$ , 8) ;A$-" ESERCITARTI , " :GO 
SUB 5 5 3 PRI HTLEPTS ( S$ , 10 ) :A$-NS+*:" 

: r e m 176 

110 GOSUB55: PRINTLEFTS (55 ,12) t A$-" (RED } 1) 
(GRN } ADDI Z IONE 11 : GOSUB55 nera 91 

415 PRINTLEFTS (55,11) :À$-*{RÉDJ2) (GRNjSQT 
TRAZ I ONE ** : GO SUB 5 5 trera 10 

420 PRINTLEFTS (56,16) ; A$ { RED } 3) (GRH)DIV 
I S IONE * : GOSUB 5 5 : rem 81 

425 PRINTLEFT$(S$,18) : A$ - " { REO) 4) (GRNjMOL 
TI PLIGAZ IONE { BLU } * : GOSUB55 :rem 65 

430 GETQ : I FQ< 10RQ> 4THEN 430 nera 121 

435 PRINT" (CLRM 2 GIU 1 M DES ) LI VELLO (1-9 

) 7 * :rem 125 

440 GETL: IPL<10RL>9THEN440 nera 113 

445 GOTO230 J rem 107 


Pacmat versione per C64 


100 POKE56 ,48 : CLR: PRINT" (CLR ) * : $M- 107 3 :CM 
*55345: L*l:BC-3 nera 142 

110 FORI -GTQ27 : PQKE54 27 2 + 1 , 0 : NEXT : FOKE54 2 
96,15:POKE54277,10:POKE54278,165 

# nera 56 

120 5$-“{HOME}l 21 GIU 1 ) " : SF-54272 : WV-542 
7S tre» 67 

130 J$- "9999999999 99 9999999999":P-3: GOTO 9 



00 

; rem 

111 

140 

3 , 

: rem 

207 

150 

FORT- 1TO3 0 0 : NEXT : RETURN 

: rem 

' 6 

160 

FORT* 1TD4 0 : NEXT : RETURN 

: rem 

216 



170 

180 

190 

200 

210 

220 

230 


240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 


380 

390 

400 

410 

420 


440 

450 

460 

470 

480 

490 

500 

510 

520 

530 


FORT- 1TO90: NEXT: RETURN l rem 224 

; : rem 211 

D-VAL ( AN$ ) ;IFASC(ANS) «8Ì ANDPR> 1THEN80 
0 trem 247 

1F1NTID) OINT(C)ORAN$>"9"THEN230 

: rem 109 

P-P+l ;R-R+1 :M-M+1: 5C*SC+10t POKESP, 223 
: POKESF+1 , 29 : POKEWV, 17 : rem 67 

FORT- ITO 5 : NEXT : POKEWV , 16 :GOTQ7Q0 

:rem 65 

M-M+l ; W-W+l : PRINTLEFTS (SS, 10-2* (Q-3) ) 
SPC(2Q«LEN(C$> )*{RV$Ì (RED}"C" 

{ 5 SPAZI} " srem 165 

POKB5F+ 1 , 8 : POKESF ,100: POKEWV , 3 3 i GOSUB 
150: POKEWV, 32 SGOTO720 :rem 136 

; :rem 209 

POKESF+1, 40: POKEWV, 17 nera 246 

GOSUB 160 : POKEWV, 16 : GOSUB160 : RETURN 

trem 196 

: : r em 212 

PR- PR+ 1 : A ■ INT ( RND ( 1) *5*L)+1 : rem 3 
B-INT (RND ( 1) *5*L) +1 : IFB>ATHENA«A+B 

nera 202 

E- INT (A* B) :AS*STR$(A) ì B$-$TR$ (B) :ES-S 
TRS(E) vrera 170 

IFQ- 1THENC* A+B : X-43 : GOTO 360 :rem 130 
I FQ- 2THENC -A-B:X-45: GOTO 360 trem 136 
I FQ- 3THENC * A : GOT04 1 0 :rem 223 

C-EtX*80 : rem 156^ 

C$-STR$ (C) : PRINTLEFTS (5$ , 7) SPC ( 20 -UN 
( A$ ) } " ( RVS } " A nera 33 

PRINTLE PT$ ( 5$ , 8 ) SPC ( 1 8 - LEN { B$ > ) ■ { RVS } 
"CHR$ (X) B*{0FPHGIUM { 3 SIN) 999* 

trem 176 

PRINTLEFTS (SS, 10) SPC U9-LEM(C$> ) iGOSU 


BI230 : IPANS“""THEN3B0 

; rem 

120 

D-VAL(AHS) : G0TO190 

: rem 

17 

; 

: rem 

206 

PBI HTLEPTS (SS , 9) SPC ( 16) " 

{ 9 SPAZI) 

H 


: rem 

128 

PRI HTLEPTS < SS , 1-2 > SPC { 18 ) 

* ( 8 SPAZI) * 


trem 

173 

PC(18)"(SU)81SIN){SU}8" 

: rem 

99 

PRI HTLEPTS (SS ,9) SPC (1B-LEN (ES ) ) " (RVS) 

"E;B 

trem 

31 

PRINTLEFTS (SS, 12) SPC (19- 

LEN(CS) ) :GOSU 

B1230 : IPANS * ■ "THEN4 50" 

: rem 

118 

GOTO190 

: rem 

109 

: 

t rem 

213 

POKEWV , 17 : FORI - 4T033 : PO KESF+1 , 1 : GOSUB 

160: NEXT: POKEWV, 16 

: rem 

54 

POKECK+P , 2 : GOSUB1 6 0 : POKECM+ P , 5 : GOSUB 1 

60 

trem 

172 

POKESF+1 , 14 3 POKEWV, 33 : POKESM+P , 69 8 POR 

I - ITO 2 3 0 : NEXT 

t rem 

154 

POKESM+P, 64 : FORI -ITO 2 50 tNBXT trem 

1 

POKESM+P, 32: POKEWV, 32: SC 

■SC-50 : IFSC<0 

THBNSC-0 

: rem 

75 

L-L-lt IPL-0THENL-L 

trem 

54 


SUPER**- £«4 39 





540 P"3 :H»0 : PRINT" (CLR) * : GOTO 12 10 

:rero 34 

550 : : rem 212 

550 PQKESH +M- 1,32: POR I - 1T06 : PGXECH+H , 3 : PO 
KESM+M ,60: PQKECM+P , 5 treni 5B 

570 POKESF+1 r 14 : POKEWV, 129 : rem 47 

5B0 POKESK+P, @2 ;GOSUB160 : POKESM+P , 58 : POKE 
CH+M , 6 : PO KESM+M ,61 : GOSUB 1 6 0 : rem 33 

580 PO KESM+M , 32 : POKESM+P, 32 : POKEWV, 128 : P- 
P~ 1 : M»M- 1 : NEXT ; rem 197 

600 POR I - 1 2T09STEP- 1 ! POKECM+ 1 , 5 1 POKESM+ 1 , 
62 : POKECM+9 , 6 : POK1SM+9 , 60 :GOSUB160 

:rem 202 

610 POKESF+1 f 14 : POKEWV, 129 : POKECM+9 , 3 : POK 
ESK+1,58 : rem 252 

620 GOSUB 1 6 0 ì POKEWV ,120: POKESM+ X , 32 : NEXT 

: r em 19 

630 POR I ■ ITO 5 : PRINT" [ HOME } ( RVS } [ Gl U * ) 

( RED ) "TAB ( 1 5 ) " # * 100 **": POKESF+1, 15: 
POKEWV ,33 : rem 15 

640 GOSU81 50: POKEWV, 32 :rem 87 

650 PRINT" { HOME } { G I CJ 1 } { RVS ) "TAB ( 15} " 

{ 9 SPASI } " : GOSUB 150 : NEXT : L*L+ 1 

: rem 168 

660 SC*SC+100:P-3:M*0:BC«BC+ÌSlFBC>3lTHEN 
&C"7 :rem 164 

670 s -rem 215 

680 POKE5328Q , BC : POKE53281 , 1 £ PRINT" {CLR) 

( BLU } " : PRINTLEFTS (SS , 3) SPC ( 9 ) J$ 

:rem 33 

690 POKE53272, 28 : PRINT" (HOME) "SPC (13)* 
(GIU 1 I { POR ) ???????? ? 7 ?? ? ? { RVS } { RED 3 S 
* : rem lj2 

700 POKESM+P- 1,32: POKBCK+P , 5 : POKESM+P ,59: 

GOSUB15Q: POKESM+P, 58 : rem 48 

710 IFSM+P-SM+18TKEN560 :rem 125 

720 PO KESM+M- 1,32: POKECM+M , 2 : POKESH+M, 61 ; 
GOSUB 150 : POKECM+M , 6 : PO KESM+M , 60 

:rem 232 


730 IPPE2K (SM+M) "PEEK (SM+P) THEN4 80 

: rem 80 

740 PRINTLEFTS {SS , 16 ) SPC (15) * { RVS 3 (CYN)LI 
VELLO i"L*[ BLU}" : rem 100 

750 PRI HTLEFTS C SS , 17 ) SPC { 9 ) J6 :rem 178 

760 PRINTLEFTS (SS , 19) * (RVS } "SPC ( 12 } NS " : "S 
C" PUNTI" : rem 33 

770 PRINTLim (SS , 7) SPC < 17 ) " { 4 SPAZI }":P 
RINTSPC (17) " { 4 SPAZI }*i PRINTSPC (13) * 



(GIU* ) { 8 

SPAZI}" : rem 

233 

780 

GOTO290 

: rem 

115 

790 

1 

: rem 

218 

800 

POKE53272 

, 21 : POKE53230 , 6 : POKE 5 3 281 

t 7 



:rem 

245 


810 FRI NT" (CLR) (GIU* ) (RVS) "SPC (13-LEN (N$) 
/2> "RISULTATI DI "N$ :rem 239 

820 PRINTSPC ( 14) * { 2 GIU v } PROBLEMI : "PR- 1 

:rem 189 

830 PRINTSPC (11) "( 2 GIU' HGRNj RISPOSTE E 
SATTE :"R: PRINTSPC (11) *{ 2 GIU 1 1 (RED) R 
ISPOSTE ERRATE t "W tre» 191 

840 PRINTSPC < 14) * { 2 GIU 1 } (BLK } VOTO; * IMT ( 
R/tPR-1) *100) "1" : rem 111 

850 PRINTSPC (10) * { 2 GIU'jGIOCHI ANCORA ( 
S/N) ?";POKE19B,G ;rem 86 

860 GETAS ! I FA$ O " S " AND A$ < > "N " THEN 8 6 0 


:rem 51 

870 IFA$«"5"TH£NPR“0 ER*0 : W»0 : SC*0 : GOTO 1 10 
0 : rem 14 

880 SYS 2 04 8 srem 109 

890 s s rem 219 

900 FORF" 55T06 3 : FORI "0TO7 : RE ADA: FOKEF* 8 + 1 
+ 12283, A: NEXT: NEXT ; rem 213 

910 FORI * 0TQ7 : POKE 3 2*8 + 1+12288,0: NEXT 

: rem 186 

920 ; srem 213 

930 POKE53280 , 2 ; POKE53281 , 7 : rem 250 

940 PRINTLEFTS (SS ,10) SPC (13) * ( BLU ) P (GRN) 
A [ RED) C { BLU } M (BLK)A (GRN)T" 

: rem 137 

950 POKE56334 , PEEK ( 56334) AND254 : POKEl , PEE 
K ( 1 ) ANO 251 >Z h 13312 : Y * 5324 8 :rem 96 
960 FORI «0TO5 19 SPOKEI+Z, PEEK (I+Y) :NEXT:FO 
RI»664T06 71 : POKEI+Z , PEEK ( I+Y) :NEXT 

E rem 68 

970 POKEl, PEEK ( 1) OR4 : PGKE56334 , PEEK (56334 
) ORI : rem 143 

980 POKE53272 , 28 : PRINTLEFTS ( S$ , 10 ) SPC ( 13) 
" ( RVS } ( BLU } P (GRN)A(RED) C (BLU}M 
(BLK) A (GRN )T" : rem 161 

990 s : rem 220 

1000 READP , G : IFF" - 1THENÌ040 : rem 52 

1010 POKESF+1, F:POKESF,G: POKEWV, 33 tGOSUBl 
60: POKEWV, 32 : GOSUB 160 : rem 190 

1020 GOTO! 000 : rem 189 

1030 i :rem 254 

1040 GOSUBl50:FORI«4TO24: PRINTLEFTS (SS, 10 
)$PC(I)"{ 2 SPAZI} (CYN)«fSlN) (REDj< 
(GRN } ; " ; : GOSUB 170 :rem 164 

1050 PRINTLEFTS (SS, 10) SPC {!)"( 2 SPAZI) 

(BLU) < (SIN) (PUR) * (GRN);" :rem 229 

1060 POKESF, 195 :POKESF+l, 17: POKEWV, 17 sGOS 
UB170: POKEWV, 16 E NEXT :rem 106 

1070 PRINTLEFTS (SS, 10) SPC (24) 3 SPAZI) 

" : rem 218 

1080 POKE53280, 5: POKE 532 81 , 7: POKE53272 , 21 

: rem 37 

1090 FRI NT" ( CLR ) "SPC ( 9) " ( 3 GIU* } (BLU)COM 
E TI CHIAMI " ; £ QOSUB260 ; INPUTNS 

:rem 105 

1100 PRI NT" (CLR ) ( BLU } "SPC ( 1 4 ) " ( 5GIU')IN 
COSA VUOI " * GOSUB260 : rem 204 


40 SUPtRVlC 2** 




Ilio PRINTSPC (14) " {GIU 1 (ESERCITARTI , 

{GIU 1 }" :GOSCJB260 treni 15 

1120 PRINTSPC (20-LEN(N$> /2) N$" : " :GOSUB26Q 

treni 92 

1130 PRINTSPC (14) " {GIU 1 f (RED}1) {GRNlADDIZ 
IONE " : GOSUB2 60 ! rem 192 

1140 PRINTSPC (14) " {GIU 1 1 {RED} 2) { GRN 1 SOTTR 
AZIONE" SGOSUB260 srem 141 

1150 PRINTSPC ( 14) " {GIU 1 1 { RED} 3) {GRNjDIVIS 
IONE" : GOSUB260 : rem 215 

1160 PRINTSPC ( 14) " {CIO 1 ì {RED} 4} {GRN {MOLTI 
PLICAZ IONE {BLU } " : GOSUB260 tieni 193 

1170 GETA$:Q-VAL(A$) :IFQ<lORQ>4THENll70 

tieni 82 

1180 PRI NTLEFTS { S$ , Q* 2 + 1 0 ) SPC ( 14 ) " { RVS } " M 
ID$ (STR$ (Q) ,2) ! rem 49 

1190 PRINTLEFT$<S$,2Q)SPC(14)"LIVELLO (1- 
9)?" srem 27 

1200 GETA$ :L”VAL ( A$) : IFL< 10RL>9THEN1200 

: rem 60 

1210 GOTO 6 80 :rem 155 

1220 : : rem 25S 

1230 PRINT" {RVS } 7 :AN$-"" : POKB19B, 0 

; rem 248 

1240 GETZA? :IFZA$-""THEN1240 :rem 101 

1250 ZL-LEN(ANS) : IFZA5-CHRS ( 20 > ANDZLTHENP 
RINTZA8 ; : ANS-LEFTS ( AN$ , ZL- 1) 

tlem 227 

1260 IFZA$«CHR$ (13) THENPRINT: RETURN 

:rem 224 

1270 IFZA$<>"Q"AND<ZA$<"0"ORZA8>"9")ORZL» 
5THBN1240 :rem 132 

1280 PRINTZA8; : AN$-AN$+ZA$ SGOTO1240 

: rem 8 3 

1290 : : rem 6 


1300 DATA0, 0,0,0, 0,0, 255, 255 tlem 106 

1310 DATA3 ,3, 3, 3, 3, 3, 3, 3 srem 171 

1320 DATA0,0,25S, 255, 255,255,0,0: rem 68 
1330 DATA24, 60, 110, 126, 126, 126,60, 24 

srem 10 

1340 DATA56, 124, 95, 248, 224, 248, 127, 56 
* srem 95 

1350 DATA60, 126, 255, 219, 255, 255, 169, 169 

: rem 198 

1360 DATA60, 126 , 255, 219, 2S5, 255,90, 180 

srem 137 

1370 DATAI 20, 116,30,14,30, 124, 120,0 

srem 201 

1380 DATA0,0,0, 14,14, 14, 0,0 srem 57 

1390 : srem 7 

1400 DATA16, 195,22, 96, 28,49, 33,125, 33,125 
,33,125,33,125 srem 195 

1410 DATA28, 49, 28, 49, 28, 49, 22, 96, 28, 49, 22 
,96,16,195,-1,0 srem 10 




Per non mandare in tilt il vostro 'cervello’ 

Rodnay Zaks ^ ' j 

PROIBITO! j||M 

O come aver cura di un computer *£ / JKBÉ 


in quanti modi si può rovinare un computer, grande o 
personal che sìa? fautore di questo volume ne elenca 
molti: alcuni dovuti a sbadataggine, altri a troppa 
confidenza con il mezzo, altri ancora a scarsa 
conoscenza dei suoi meccanismi e della loro estrema 
vulnerabilità. C'è. anche, un’intera parte dedicata ai 
sabotaggi da calcolatore: furti, spionaggio 
industriale, distruzione delle informazioni.,, 

Insomma un libro curioso, ma prezioso, per 
vivere per anni, senza problemi, insieme al 
proprio amico ‘cervello’ elettronico. 

196 pagine, Ure 14-000 Codio» 333 D 






Wow! Ora sì 
divertirti! 

hit A tari sano 
anche per il 





80 





che puoi 
Da oggi i grandi 

disponibili 

tuo computer! A 



MS.PAC-MAN 

e i rxami de» retativi 
perdanomi sono marchi 
delia Bafly Mìdwuy 
Mtg. Co, torcessi in 

sub-lìcÉnzo al ta Alar i ciglio 
Nomea America Ine 


Eccoli, finalmente! Sono i nuovi, entusiasmanti programmi 
Alari per Vie 20, Tl 99/A, ZX Spedram, Apple II, IBM. 

E non hot bisogno di adattatori. Atarisoft ha già pensate 
a Mio. Per agii computer il sjo giuste software. 
Inserisci b cassetta o il nastra e sei pronte a vivere 
Mie le piu belle sfide Alan, E a viverle sino in fondo. 
Perché il bello di Alari è che la sfida diventa sempre 
più difficile. Con Atarisoft puoi giocare i grandi hit Alari e 
tanti atei giachi: Poc-Man, Ms. Poc-Man, Dtg Dug, 
Cèntipede, Jungle Hunf, Joust, Donkey Kong, Moon Potrai, 
Gaiaxian, Defender, Robotron 2064. 

ATARISOFT 












trad. ed adatt. 
ài (I. Barzaghi 


a -boot, per VIC t C64, comincia ab 
bastanza tranquillamente, ma non 
lasciatevi cullare In un falso senso di 
sicurezza. Senza alcun preavviso, sare- 
te obbligati a far uso di tutta la vostra 
presenza di spirito per salvarvi. 
Xl-boor rappresenta, una volta tanto, 
un piacevole cambiamento di ritmo ri* 
spetto al giochi ad alta velocità, del ti- 
po corri -e-tira. 

Mentre pattugliate tranquillamente il 
fondo dell'oceano, la calma è rotta ben 
presto dainmprowisa esplosione di 
una carica di profondità. Sopra di voi, 
sulla superfìcie dell'oceano, cl sono 
cacciatorpediniere impegnati in una 
missione di ricerca e distruzione. E r 
come se non bastasse, c'è un continuo 
rifornimento dì mine per tenervi occu- 
pati. 

L'obiettivo del gioco è di affondare 
quante più navi è possibile, prima che 
le loro cariche dì profondità vi raggiun- 
gano. Sulla superfìcie dell’oceano, 
cacciatorpediniere e portaerei passano 
avanti e indietro sganciando II loro ca- 
rico di distruzione. Alcune sganciano a 
caso, ma altre sparano a zero sul vo- 
stro U-boot. 

Voi potete distruggere le mine che vi 
infastidiscono con ] vostri siluri, ma 


nuove mine le rimpiazzano sempre 
ogni cinque nave affondate. Quindi, 
per mantenere sgombra la vostra zona 
di pattugliamento, dovete passare un 
po' del vostro tempo dì tanto in tanto 
per rimuovere le mine. È anche impor- 
tante ricordarsi che, quando le cariche 
di profondità e le mine esplodono, 
coinvolgono le otto unità video che le 
circondano. Se il vostro O-boot è com- 
preso In quest'area, è costretto ad un 
ritiro permanente. 

la versione VIC 

G-boot è stato progettato per fornire 
un gran nifmero di oggetti sullo scher- 
mo senza rallentare eccessivamente II 
gioco. Come molti programmatori 
sanno, troppe istruzioni POKE e 
PRINT possono rovinare la qualità del 
gioco per quanto riguarda la rapidità 
di azione. Ad esempio, le due solite 
istruzioni di POKE alla locazione 
37154, sono state tralasciate dalla rou- 
tine di lettura del joystick. 

Utilizzare l'Istruzione MID$ è una buo- 
na tecnica per ottenere rapidi sposta- 
menti di più oggetti sullo schermo. Nel 
programma 2, MIDà è stata utilizzala 
al posto di una istruzione di POKE per 
muovere le navi attraverso lo schermo. 


poiché è più rapida. 

Inoltre, quando abbiamo inizialmente 
scritto il programma utilizzando ìstru- 
rioni di POKE, la prua della nave af- 
fondava nel mare quando le navi usci- 
vano da un lato dello schermo. Si pote- 
va ovviare a questo difetto con delle 
istruzioni IF. ma usando l'istruzione 
MJDS la soluzione è più rapida e sem- 
plice, Poiché 11 numero di caratteri mo- 
stralo sullo schermo da una istruzione 
MID» è fissato a 22 (la larghezza dello 
schermo del VIC), la nave scompare 
proprio come se avesse abbandonato il 
vostro campo visivo. 

Le Istruzioni LEFTS, RIGHT$ e MID$, 
spesso forniscono effetti migliori e più 
veloci nella programmazione del gio- 
chi. 

Battete e registrate innanzi tutto il pro- 
gramma 1. Questo programma mostra 
le istruzioni e ridefinisce 1 caratteri ne- 
cessari per il gioco. Spegnete II calco- 
latore, quindi battete e registrate il 
programma 2 subito dopo il program- 
ma 1 sullo stesso nastro. Quando man- 
date In esecuzione il programma 1, 
questo caricherà e manderà In esecu- 
zione automaticamente il programma 
2 , 

La versione C64 necessita, invece, di 
joystick, pur fornendo gli stessi effetti. 



1P04 DATA , ,4,4,15, 10,127,63, , 192, 196,200, 
208*224, 2 5 5,254 : rem 220 

1006 DATA, 1,35, 18*11, 7, 255, 127,, ,12,32*24 
0,80, 254, 252, 254, 254, 252, 252,, ili, 20 
8,224 srem 214 

1008 DATA 2 55, 255, 127,63, ,80, 3,31,255,255, 
254, 254,, 10, 182, 248 :rem 186 

1010 DATA 127 ,127, 63, 63, ,161, 11, 7, 2 55, 238, 
238, 238,239,189, 215, 255, 65, 41 , 6B, 175 
,122,189 :fm 172 

1012 DATA110, 218,17,74, 148,125,218,180,22 
1,182,255,255,255,255,255,255,255,25 
5 : rem 68 

1014 DATA191, 213, 107,82,171,237,180, 218,2 
47,174,181,125,235,188,173,222 

srem 243 

1016 DATA- 1,78,68,87,13,131 :rem 88 


U-Boot versione per VIC 20 

Programma 1 

5 PRINT m {CLRK 6 GIU* ) ( BLU } { RVS } 

{ 6 SPAZI}U-BOOT{ 8 SPAZI}" srem 230 
10 X-2B : POKE52 , X : POKE56 , X: FORESI , PEEK < 55) 

srem 231 

20 F0RI«7l68T07679sP0KEI, PEEK (1+25600) : NE 
XT srem 99 

30 READT : I FT«- 1THBN50 srem 31 

40 POKE7 1 68 +0 , T : Q"Q+ 1 : PO KE 3 6 8 7 9 , T S GOTO 30 

: rem 170 

50 POKE36879 , 2B : PRINT" { 3 GIU') ISTRUZION 
I? 1 SPAZI } (S/N) " srem 153 

55 FORT" ITO 10 00 : GETAS : IFAS *"N"TH£NT" 1000 

: r em 116 

€0 I FA$ ■ " S " THE NT ■ 1000 ; NEXT : GOTO 100 

:retn 44 

65 NEXT : GOTO 1 50 :rem 179 

100 PRI NT" { CLR } (GIU 1 } LANC I ATE SILURI DALL 
A PRUA DEL SOTTOMARINO" : rem 233 

105 PRINT" P£R AFFONDARE LE NAVI E FAR ESP 
LODERE LE HI-NE. " srem 105 

110 PRINT" {GIU ' ) FATE ATTENZIONE AL 

{ 4 SPAZI } RAGGIO DI AZIONE DELLE" 

i rem 148 

115 PRINT" (SU }MI NE E DELLE BOMBE DI PROFO 
NDTTA * QUANDO! 4 SPAZ I } ESPLODONO . " 

: rem 133 

120 PRINT" (GIU 1 }DISTRUGGETE QUANTE 

{ 4 SPAZI} PIU 1 NAVI POTETE PRIMA" 

srem 23 

122 PRINT" {SU)DI ESSERE COSTRETTI A RITIR 
ARVI{ 2 SPAZ I } DEP I N I T I VA-MENTE ì " 

: rem 179 


Programma 2 

0 GOTO6O0 : rem 255 

50 P A" PEE K ( 3 7 1 5 2 ) AMD 1 2 8 : P" PEE K( 37151) :IP- 
( (PAND32) »0 ) ORLTHENGOSUBl 50 ! rem 22 

70 1 F- ( PA"0 ) THENAY" AY+1 ? X" 12 : IFAY>2QTHENA 
Y"AY* 1 srera 161 

72 IF- ( (PANO 16) -0) THENAY-AY-lsX"10: IFAY<0 
THENAY*AY+1 srem 183 

74 IF- ( (PANDA) -0) THENAX-AX+ 2 2 : I PAX> 198THE 
NAX-AX-22 : rem 47 

76 IF* ( (PAND4) "0) THENAX-AX- 22 : I FAX< - 22THE 
NAX" AX+22 : rem 26 

80 A-AX+AY+7900:P»PEEK(A) ; F0-PEEK ( A+l) : PO 
KEA1 , 17 : POKEA1 + 1 , 17 ! PQKEA, X: POKEA+1 , X+ 
1:A1-A :rem 63 

82 IFP< 20RPQC 2THEN4 00 srem 9 

84 LM»LM+Iì IFLM<RRTHEN92 : rem 18 

86 Ni «N 1+2 2 : CO "PEEK (Ni) : I FNl-AORN 1-A+1THE 
NPOKEN 1-22,17: GOTC4 0 0 srem 255 

88 IFNl>AORCO< 3THEN3O0 :rem 97 

90 PO KEN 1 -22,17: POKEN 1 , 1 srem 129 

82 IFM>VTNENsPRINT"(HOMEHBLK} { 7 GIUM"M 
ID$(A$ (TT) ,H,22) ; SH-H+M2 : IFH-HlTHENM-0 
:K«1 srem 108 

94 M-M+ls IFM<VTHEN50 : rem 220 

96 I FH* VTHEN 100 :rem 158 

98 GOTO 50 : rem 15 

100 LM*0 ; Nl*7856+AY 1 T" (RND (1) * 6) +l:ONTGOT 
0110,108,106,104 srem 169 

102 TT-(RNDd) *2)+l;H“2:Hl"26sM2"l:RR"22- 
(LM+AY) IGOT094 ; rem 146 

104 TT» (RND (1) *2) + 3 : H- 26 : Hi - 2 : M2--2 : RR*- { 
LM- A Y ) / 2 : GOTO 9 4 s rem 195 

106 TT" { RND (1) *2}+3:H"2B : Hi ■ 2 : M 2 » - 2 : T»RND 
(1) * 1 9 : N 1 ■ 7 8 5 8 +T ì RR« 3 - ( LM-T) /2 : G0TO94 

srem 202 


125 FORT-lTOSOOOs NEXT SPRINT" {GIU 1 } {RVS} 

{ 4 SPAZI) PREMI UN TASTO { 4 SPAZI}" 

s rem 251 

130 GETAS : IFA$*""THEN!3Q S rem 75 

140 REM LA PROSSIMA RIGA ANNULLA IL PROGR 
AMMA, NON INSERITELA IN SEDE DI CORRE 
ZIONE » srem 89 

150 PRINT" {CLR} " ; POKE198 , 5 : FOFT»6 31T0635 : 

READX : POKET, X : NEXT i rem 91 

1000 DATA182, 193, 213, 128, 201, 193, 182, 255, 

255.159.159.159.243.243.243.255.. .., 

255,101,63 : rem 234 

1002 DATA31,, 96, 112, 252, 255, 148, 255, 255,, 

14. 30. 127. 255. 145. 255. 255.. ... 255. 16 

6,252,24 8 : rem 174 


108 TT-4:H«2S:Hl»2:M2*-l:T-RND (1} *19:Nl«7 
858+T;RR"3* (LH-T) : GOTO 9 4 :rem 45 

110 TT«2sH-2sHl»26sM2-lsT-RND (1) *20: Ni «78 
56+T:RR»22- (LM+T) SG0T094 srem 26 

150 L-L+l : IFL<2THÉNC-A: IFX»12THENC*A+1 

srem 71 

152 C«C- 22 SCO-PEBK (C) s IFCO< 1 7THEN160 

srem 115 

154 I FC < 7 8 5 6 THENPOKEC 4 2 2 , 1 7 : L» 0 : RETURN 

srem 83 

156 POKEC+22 , 17 : PO REC , 14 s RETURN : rem 136 

160 ONCO+1GOTG162, 162 sGOTOlBO : rem 197 

162 POKEZZ-2, ( RND (1) *50)+155: FORT* - ITO 1 S F 
ORI*- ITO 1 ! PORBZ Z- 1 , 10-T- 1 sC 1*PEEK (C+I 
+T*22) : rem 244 


sm^cttvic- 2M 45 




164 I FC 1 * 1THENRR- 9 9 : LM* 0 trem' 206 

168 t FC 1 > 9 ANDC 1 < 1 4 TH EHM 1*1 trem 28 

169 L*0 : POKEC+ I +T* 22, (RND (1) *2} +18 : NEXTI , 
Tt POKEZ Z- 2 ,0:1 FM1*1THEN4Q0 :rem 235 

170 FORT* - ITO 1 : FORI ■- ITO 1 t POKEC+I+T* 22,17 

: NEXTI , T: RETURN : rem 56 

180 PRINT" {HOME}( PUR M 7 GIU 1 } "HID$ ( A$ (0) 
,H, 22} ; PORRO +22,17: PO KEC -22, 32 : POKEZ Z 
-2 , (RHD (1)* 100) +140 :rem 64 

182 FORT* 1 5TO0 STEP - .09: PO KEZ Z - 1 , T s NBXT i PR 
INT"{HOME}( 7 GlU'ìf 22 SPAZI)"? 


184 

H«0:L«0: 1FC0<7THENBS-BS+1 

trem 

trem 

144 

10 

IBS 

I FCO > 6THENMS “MS + 1 

; rem 

60 

188 

I FLH< FRTHENRR ■ 9 9 

trem 

43 

190 

IFMS + BS- STHENPOKEZ Z , 24S:V- 

20 t rem 

6 

192 

IFMS+BS-1STHEHP0KEZZ , 232 ! V 

*10 



■f 

: rem 

49 


SEélH €9 

194 IFMS+BS* 30THENPOKEZ Z , 204 ; rem 1 

196 IF (MS+BS ) /5*INT ( ( HS+BS ) / 5 ) THENFORT* IT 


OB : P0KE7878+ ( RND ( 1) *197) f 0;NEXTlJ»l 

trem 64 

198 I F J* 1 THENFORT- - ITO 2 : FORI - - ITO 1 : POKEA+ 
T+I*22, 17: NEXTI, T:J-0 : rem 142 

200 RETURN treni 114 

300 J-l5:RR*99:ML-0:POKEZZ-2, (RND(1>*30) + 
128: FORT* -ITOI: FORI *-lTQl;Cl*PEEK(Nl + 
I+T* 22) : rem 29 

302 PQKEZZ-l,JtJ*J-l*6: IFCI-14THENL-Q 

: rem 224 

304 1PC1>9ANDC1<14THBNM1*1 treni 20 

306 POKENl+I+T*22, (RND (1) *2) +18;NEXTI ,T:P 
OKEZ Z- 2 , 0 : IFMl * 1THFN4 00 treni 45 

308 FORT* - ITO 1 1 FORI *- ITOI : POKENl +I+T*22 , 1 

7 : NEXTI , T :GOTC92 : rem 59 

309 POKENl+I +T*22 , ( RND ( 1 ) *2) +18:NEXTI ,T:F 

OKEZZ-2,OtIFMl*lTHEN400 treni 48 

400 POKEZZ-l,LStPOKEA,l5:POKEA+l, f 16 

: rem 60 

402 FORT* ITO 16STEP * 15 : PQKEZZ-2 , 255-T* 5 : PO 
KE Z 2 / T* 1 1 : NEXT t POKEZ Z -5,0 : rem 186 

404 FORT“15TOQSTEP-.2:POKEA, (RND ( 1) * 2 ) +18 
;POKEA+l,(RND(Ì>*2)+18 treni 104 

406 POKE2Z- 1 , T: NEXT : POKEZ2 - 2 f 0 : POKEZZ- 10 , 

240 : POKEZZ, 221 : rem 247 

407 PRINT" (CLRHBLKHGIO' }HAI AFFONDATO": 

FRI NTBS" PORTAEREI EfGXU' }" trem 165 

408 PRINTKS"CACClATORPEDI N IERI": FORT* ITO 2 

OOOtNEXT : rem 240 

410 PRINT" ( 3 GIUMVUOI GIOCARE ANCORA ?" 
SPRINT" (RVS) (GIU 1 M 3 SPAZI JALTO-SI B 
ASSO-NO { 3 SPAZI}" : rem 82 

412 IF- ( fPEEK (37151) AND 4 ) » 0 ) THENRUN 

: rem 4 

414 IP- ( (PEEK( 37151) AND8) -0) THENPOKB371 54 
,255: PRINT" (CLR> ARRI VEDERCI END 

trem 29 

416 G0T0412 trem 107 

600 ZZ-36879: POKEZ Z , 24 : POKEZZ- 10 , 255 : POKE 
ZZ- 1, 15 : POKE37154 , 127 :X-10 : V-30 ;AX«19 

8 ; AY-IQ : rem 126 


602 RR-30 : H* 2 : PRINT" (CLR) (BLKHRVS) 

{ 5 SPAZ I }U-BOOT{ 2 SPAZI } 26 
t 7 SPAZ I } {OFF ) "CHR$ { 8) ; trem 130 
604 A$ { 1 > * " { 21 SPAZI ) BDE { 3 SPAZl}":AS(2 
)-"( 21 SPAZI }FG{ 3 SPAZI}" trem 253 
606 A$ ( 3 ) - " { 25 SPAZ I } BCE "tA$(4)«" 

l 25 SPAZI }HI * trem 6 

608 A$ ( 0 ) » " { 22 SPAZI }OPOP ■ :rem 67 
610 FORT* 1T04: PRINT" (YEL lOQOQOOOOOQOQOOOQ 
QOGQOQ"; tNEXT: PRINT" { 3 GIU 1 }"?: FORT* 
ITO 12 trem 204 

612 PRINT* { BLU ) 0000000000000000000000" ; sN 
EXT t rem 51 

614 F0RT-Bl2OTO8i86:POKET, 17 : PQKE30720+T, 
0 : NEXT : FORT* ITO 1 5 : POKE 7 8 7 8 + ( RND { 1} *19 
7) ,0 :rem 158 

618 NEXT: POKEB108 , 17 : PGKE8Ì09 , 17 : GOTO 50 

:rem 83 


tl-Boot versione per C64 

100 POKE55 , 0 : POKE 56 , 4 8 sCLR: PRINT* {CLR} "CH 
RS (8) :GOTO880 trem 72 

110 : trem 204 

120 FORI -0TO27 : POKE 1 + 54 2 72 , 0 : NEXT 

trem 242 

13 0 POKE 54296,15: POKE 54 272,100: POKE 54273, 
5 : POKE54 2 77 t 0 : POKE54278 ,24 9 trem 100 
140 POKE54279,100: POKE54 2 80 , 2 t POKE54 284 , 0 
:?OKE54285, 249 srem 94 

150 POKE54291 #0: POKE 5 4 29 2 , 24 9:M*V:GOTO340 

trem 132 

160 : : rem 209 

170 MV-ltP-PEEK< 56320) t IFP-127THENMV-0 

trem 21 

180 IF(PAND16) “OORLTHENGOSUB420 :rem 162 
190 I F ( P AND 8 ) «OTHENAY-AY+1 : X* 12 1 IFAY>38TH 
ENAY*AY- 1 trem 122 

200 IF ( PANO 4) -0THENAY*AY-1:X*10: IFAYCOTHE 
NAY-AY+1 : r em 47 

210 I F ( P AND 2 ) * OTHENAX* AX+40 : 1 FAX > 3 6 QTHEN A 
X-AX-40 : rem 202 

220 IF (PANDI) -OTHENAX-AX-40:IFAX<*8OTHENA 
X* AX+40 trem 196 

230 A-AX+AY+1424:P-PEEK(A) : PO-PEEK ( A+l) ti 
FMVTHENPQ KE A 1 , 17 : POKEAl+l, 17 : rem 138 
240 POKEA, X : POKEA+1 , X+l : Al*A : rem 154 

2 50 IFP< 2ORP0X 2THEN760 : rem 63 

260 LM-LM+1: IFLH<RRTHEN300 : rem 103 

270 Nl-Nl+40:CO*PEEK(Nl) : 1 PN 1 -AORN 1 * A+ 1TH 
ENPOKEN 1-40,17: GOT07 6 0 
280 IFNl > AORCO< 3THEN630 
290 POKENl-40, 17:POKENl,l 
300 IFM>VTHENPRINT" (HOME) {BLK} { 7 GIU , )"M 
ID$ (A? (TT) # H , 40) ; :H*H+M2: IFH-HlTHENM- 
OlH-1 

310 M-M+1:XFM-VTHEN340 
320 GOTO 170 
330 : 

340 LM*0 ; N1-1344+AY : T-RND ( 1) *6+1 ;0NTG0T03 
90, 380, 370, 360 

350 TT-RND(l) *2+1 : H*2 : Hl-44 :K2*1 :RR*40- 
M+AY) : GOTO310 
360 TT-RND (1) *2+3 : H-44 ; Hl*2 :M2*-2 : RR*- (LM 
- AY) / 2 ì GOTO 310 
370 TT-RND (1) *2+3 sH*46 t Hl-2 : M2--2 :T-RND (1 
) *37 :Nl*1344+TsRR*3- (LH-T) /2 :GOTO310 

trem 14’ 

380 TT*4:H-46:H1-2:M2--1:T*RND CD *37:N1*1 
344+T:RR-3- (LM-T) tGOTOUO 


trem 

51 

trem 

150 

: rem 

179 

7 GIU 1 }"M 

■H1THENM* 

: rem 

90 

: rem 

54 

: rem 

102 

trem 

208 

O 

% 

s 

3 

Ui 

: rem 

99 

:RR*40- (L 

trem 

109 

2:RR* 

- (LM 

: rem 

157 

2 :T*RMD (1 

t G0T03 10 

t rem 

147 

) *37: 

Nl*l 

trem 

70 


46 KfBMC* £44 



390 TT-2:H-2:H1»44 ;M2»1:T«RND [1)*38:N1»13 



44+T: RR-40 - (LM+T) SGOTO310 

: rem 

70 

400 

S 

srem 

206 

410 

REM MOVIMENTO SILURO 

srem 

21 

420 

L-L+1:IFL<2THENC-A: IFX-12THENC-A+1 




srem 

71 

430 

C*C-40 :CO*PEEK (C) : IPCO< 17THEN460 




i rem 

117 

440 

PO raC+40 , 17 1 IEC< 1344THBKL-0 : RETURN 



srem 

67 

450 

POKBC, 14: RETURN 

trem 

1B2 

460 

IFCOO0ANDCOO1THEN540 

s rem 

61 

470 

POKE54276, 129 ; POKE 54 2 76 ,128 

1 rem 

210 

480 

FORT»- lTOl 3 FORI » - lTOl SC 1-PEEK (C+I+T* 4 


0) 

;rem 

68 

490 

I FC 1 ■ 1THENRR “ 99 : LM» 0 

t rem 

208 

500 

IFCl>9ANDCl< 14THENM1-1 

Iran 

18 


510 L» 0 : POKBC + I+T* 4 0 , (RND (1) *2» +18;NEXT:N 
EXT : IFH1-1THBN760 : rem 194 

520 FORT»- lTOl: FORI --lTOl:POK£C+I+T* 40,17 
E NEXT: NEXT: RETURN 3 rem 231 

530 ; : rem 210 

540 PRINT" (HOME) (PUR} 1 7 GIU 1 ) "HXD$ (A4 (0) 
, H , 40) :POKEC+40, 17sPOKBC-40,32 




s rem 

102 

550 

POKE54276 , 129 : POKE54 276, 128 

: rem 

209 

560 

FORT- ITOIOO: NEXT 

s rem 

241 

570 

PRINT" (WHT) {HOME} ( 7 GIU T } 




( 40 SPAZI }"l 

: rem 

55 

580 

M ■ 0 : L » 0 : 1 FCO< 7 THENBS» BS+ 1 

: rem 

10 

590 

I FCO > 6 THENMS - MS + 1 

: rem 

59 

600 

I FLM< RRTHENRR- 9 9 

: rem 

32 

610 

IPMS+BS-5THENPOKE53281,7:V-20 




: rem 

235 

620 

I FMS+BS » 1 5THENPOKE 5 3 2 81 , 1 4 S V 

r-io 




: rem 

74 

630 

IFMS+BS» 30THENPOKE5 3281 , 10 

: rem 

22 


840 IF(MS+BS)/5»1NT( (NS+BS)/5) THENFORT-LT 
08: POKE13B4+ {RND ( 1) * 3 59) ,0:NEXTsJ»l 

: rem 44 

850 IFJ-1THBNPORT--1T02: FORI»- ITO lsPQKEA+ 
T+I*40,17:NEXTiNEXT: J*0 : rem 55 

680 RETURN : rem 124 

670 t : rem 215 

880 RR» 9 9 E HL» 0 : PORR 5 4 283,129: PO ICE 54 2 83,12 
8 ; rem 150 

690 FORT» - ITO 1 : FORI »* ITO 1 : C 1 »PEE K ( Ni +1 +T* 
40) : rem 131 

700 IFC1-14THENL-0 : rem 36 

710 IFC1>9ANDC1< 14THENM1-1 irem 21 

720 POKEN1+I+T*40 , (RND ( 1) *2) +18 sNEXT: NEXT 
: IFM1-1THEN760 t rem 14 

730 FORT»- ITO 1 J FORI «- lTOl : POKENl+I+T* 4Q , 1 
7 E NEXT: NEXT : GOTO 3 00 :rem 18 

740 : srem 213 

750 REM AFFONDAMENTO DEL SOTTOMARINO 

: rem 38 

780 POKEA, 15 : POKEA+ 1 , 16 : POKE54 286 , 0 : POKE 5 
4290,129 srem 59 

770 FORT» 2 3 OTO 2 5 5 STBP .15: PO KE 5 4287, 2 5 5 - T : 
POKE5 3 2 81 , 15ANOT: NEXT: POKE 54 29 Q , 128 

t rem 72 

780 FORT- 1TO50: POKEA, ( RND ( 1) # 2 ) +1 8 3 POKEÀ+ 
1, (RND{1) *2) +18 srem 166 

790 NEXT : PQKB5 3272,21: POKE 5 3280,0; PO RE 532 
81,5 : rem 110 

800 PRINT" {CLR}{BLK}{ 3 GIU 1 } "SPC (9 ) "HAI 
AFFONDATO* BS" PORTAEREI” srem 91 

810 PRINTSPC ( 10} " f 2 GIU 1 )B"MS*CACCIATORP 
EDINIERE" srem 107 


820 PRINTSPC (DM 5 GIU') PREMI IL PULSANT 
E DI SPARO PER GIOCARE" E I»0 : rem 137 
830 IF (PESE ( 5832 0) AND 16) -OTHENRUN890 

3 rem 93 

840 I»I+1 E IFIM0QOTHENPRINT" {CLR}" ; :END 


850 

GOTO 8 30 

s rem 

srem 

183 

113 

860 

X 

s rem 

216 

870 

REM INI ZXALIZZAZ IONE 

: rem 

86 

880 

GOSUB 1060 

: reo 

231 


890 PRINT" {CLR} " t POKE53280 , 0 S POXES328 1 , 1 

:tem 149 

900 POKE 53272,28; POKE54296, 15 : ZZ-80000 

srem 137 

910 X-10:V-3OiAX-36O:AY«20:RR»3O:H-2 

: rem 75 

920 PRINTSPC ( 13 ) * ( BLK } (RVS } ( 2 SPAZI }U-BO 
OT{ 2 SPAZI } 26 { 2 SPAZI}* : rem 199 

930 A$ {!)»"( 39 SPAZI}BCE( 3 SPAZI}" 

: rem 206 

940 A8(2)»"l 39 SPAZI }FG{ 3 SPAZI}" 

: rem 147 

950 A$(3)»"( 43 SPAZI }BDE " srem 211 

960 A$<4)»"( 43 SPAZI} HI * : rem 155 

970 A8 ( 0 ) » " ( 40 SPAZI }OPOP " ; rem 69 

980 FORT-1T04: PRINT" {YELJQQQOQOQQQOQOQOOQ 

qqqqqqqqqqqqqqqqqqqqqqqq" ì = *rexr 

: rem 38 

990 PRINT" (GIU 1 }" 3 rem 132 

1000 FORT- 1T01 2: PRINT" ( BLU } OQQQQQQOQQQQQG 
GQQQQQOQOQOQQQQQQQQQQQQQQQ" ì : NEXT 

:rem 246 

1010 FORT» 1 8 2 4T02 02 3 : POKET ,17; POKE 54 2 7 2 +T 

, 0 3 NEXT srem 133 

1020 FORT-1T015 : POKE13S4+RMD (1) *359,0 :NBX 
T i rem 223 

1030 POKE 17 94 , 17 i POKE 1795 , 17 (GOTO 120 

s rem 53 

1040 s : rem 255 

1050 REM SET DI CARATTERI :rem 194 

1060 POKE53280, OtPOKE53281, 4 SPRINT* (CLR) 

( 6 GIU* } (BLU} "SPC (13} " (RVS} 

{ 2 SPAZI }U-BOOT 26 ( 2 SPAZI}* 

3 rem 82 

1070 PRINTSPC (10) *( 3 GIUM( 2 DES } ATTEND 



ERE PREGO" 

: rem 

183 

1080 

POR I » OTO 5 8 : RE ADA £ POKE 4 9 1 5 2+1 , A : NEXT 3 


SYS49152 

xrem 

19 

1090 

READTs IFT*-lTHBNll30 

: rem 

230 

1100 

PO KE1 2288+Q, TsQ-G+ls 

GOTO 1090 




srem 

164 

ino 

1 

xrem 

253 

1120 

REM ISTRUZIONI 

srem 

200 


1130 PRINT" (CLR}{ 3 GIU 1 } LANCIATE SILURI 
DALLA PRUA DEL SOTTOMA- " 3 rem 52 

1140 PRINT "RI NO PER AFFONDARE LE NAVI £ F 
AR ESPLO- DERE LE MINE* " S rem 209 

1150 PRINT" ( 3 GIU'JFATE ATTENZIONE AL RA 
GGIO DI AZIONE DEL-" : rem 135 

1160 PRINT" (SU} LE .MINE E DELLE CARICHE DI 
PROFONDITÀ 1 ( 2 SPAZIjQUANDO ESPLODO 
NO*" * :rem 209 

1170 PRINT" ( 3 GIU* IDI STRUGGETE QUANTE PI 
U’ NAVI POTETE FRI-" : rem 14 

UBO PRINT" (SU)MA DI ESSERE COSTRETTI A R 
STIRARVI DEFI-N ITI VANENTE ! " : rem 118 
1190 PRINTSPC ( 12) "{ 4 GIU'H ^ SINHRVS} 
PREMI IL PULSANTE *: POKE 198,0 

: rem 171 

1200 IFPEEK (56320) AND16TKEN1200 : rem 244 


surovic* z«4 47 




1210 RETURN :rem 164 

1220 i : rem 255 

1230 DATAI 73, 14, 220 ,4 1,2 54 ,141 ,14 ,220,165 
, 1,41,251,133,1,169 :rem 157 

1240 DATA 4 8,133,252,169,209, 133,254, 16 9,0 
,133,251,133,253 irmm 41 

1250 DATAÌ62 ,8,177, 253,145,251,200, 208,24 
9,230,254,230,252 : rem 67 

1260 DATA202, 208, 242, 165, 1,9, 4, 133, 1,173, 
14,220,9,1,141,14,220,96 : rem 147 

1270 I : rem 4 

1280 DATA182, 193, 213, 128, 210, 193,182,255 

: rem 233 


1290 DATA255, 159, 159,159, 243,243,243,255 
, srem 250 

1300 DATAO, 0,0, 0,255, 101, 63, 31 sten 205 
1310 DATAO, 96, 112, 252, 255, 148, 255,255 

s rem 80 

1320 DATAO, 14, 30, 127,255,145,255,255 

:rem 20 

1330 DATAO, 0,0, 0,255, 166, 252, 248:rem 69 

1340 DATAO, 0,4, 4, 15,10,127,63 i rem 168 
1350 DATAO, 1 92, 196, 200, 20 8, 224, 2 55, 2 54 

irem 126 

1360 DATAO, 3, 35, 19, 11, 7, 255, 127 srem 28 
1370 DATAO ,0,32,32,240,80,254,252 

:rem 117 

1380 DATA254, 254, 252, 252,0, 133, 20B, 224 

e»*. :rem 123 

1390 DATA25S, 255, 127,63,0,80,3,31 


: rem 133 

1400 DATA255, 255, 254 ,254,0,10,192,248 

:rem 76 

1410 DATAI 27*127*63,63,0,161* 11,7 

: rem 123 

1420 DATA2 55, 239*239,239, 239, 19 9, 21 5,255 

: rem 0 

1430 DATA6 5 ,41,68,175,122,169,110,219 

: rem 86 

1440 DATA 17,74,148,125,218,180,221,182 

:rem 131 

1450 PÀTA255, 255,255,255,255,255,255,255 

srem 248 

1460 DATA19Ì, 213, 187, 92 ,171 ,217, 190,219 

srem 192 

1470 DATA 247,174,181*125,235,189,173,222 

: rem 242 

1480 DATA- 1 srem 69 
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di M. CrtJtuib Qrlixl 



S e votele dere libero sfogo elle vo- 
stre voglie "d azzardo' sento ri* 
schiere il portafogli» o ie volete olle* 
narvi per sbancare Saint Vincent, gua- 
sto è it programmo che fa per voi! 
Potete fare qualsiasi tipo di giocala 
ammessa dallo roulette europea (che si 
distingue do quella americano per la 
mancanza del doppio zero); per chi 
non conoscesse gii le forme di puntato 
esistenti ne do qui un breve riassunto: 

MCI ME RI PIENI: è la classica giocata 
su un numero che, se estratto, rende 
35 volte la posta. 

CAVALLI: gruppi di due numeri, ad 
esempio 1 e 2 oppure 1 e 4: paga 17 
volte la posta. 

TERZINE: gruppi di due numeri con- 
secutivi sulla stessa riga, come 1,2,3 
oppure 13, 14, 15: paga 1 1 volte la po- 
sta. 

CARRÉ: gruppi di quattro numeri in 
quadrato, come 1 , 2, 4, 5 oppure 14, 
15, 17, 18; paga 8 volte la posta. 
SESTINE: gruppi di sei numeri con se 
cuti vi su due righe, come sestina 16 
oppure sestina 13-10: paga 5 volte la 
posta. 

DOZZINE: le tre dozzine glocablli so- 
no la M2, la 13-24 e la 25-36: pagano 
2 volte la posta. 

COLONNE: le tre colonne A, B, e C pa- 
gano due volte le posta. 
PASSE/MANQUE: E primi diciotto nu- 
meri escluso lo zero sono 11 Passe, 
mentre i secondi diciotto costituisco- 
no Il Manque; paga 1 volta la posta. 
PARl/DISPARI e ROSSO/NERO: pa- 
gano 1 volta la posta. 

I! programma, dopo essersi informato 
sul numero dei giocatori e sul rispettivi 
capitali disponibili, passa al primo gio- 
catore e gli chiede quali giocate Inten- 
da fare tramite un menu di gioco. Sce- 
gliendo la (o le) opzioni desiderate si 
visual Izze rè il tavolo verde ed II pro- 
gramma chiederà numeri e puntata. 
Per puntate su terzine, carré, sestine e 
dozzine sarà sufficiente battere il nu- 
mero più basso compreso nel gruppo, 
ed il computer prowederà a calcolare 
anche gli altri automaticamente. Dopo 


ogni puntata viene visuaJizzato il capi- 
tale ancora disponibile e quello gioca- 
to: finito di puntare, premete il tasto di 
fine giocata ed il calcolatore, dopo 
avervi informati sul totale giocato, pas- 
serà a raccogliere le puntate del gioca- 
tore seguente. 

Quando tutti avranno puntato verrà 
estratto 11 fatidico numero e visualizza- 
ti gli esiti, giocatore per giocatore e 
giocata per giocata. Si passerà quindi 
a raccogliere le puntate successive con 

10 stesso sistema sopra descritto. 

11 programma è ricco di controlli e 
quindi, se provate a barare, vi prende 
sempre in castagna. Se poi malaugura- 
tamente finite I vostri soldi, il compu- 
ter ve ne presterà quanti ne volete, me 
ricordandovi sempre il debito e facen- 
dosi pagare quando doveste recuperar- 
li con le vostre giocate. 


Commento il listato 

Il programma è stato scritto secondo II 
principio della programmazione mo- 
dulare: è un insieme di numerose su- 
broutines che accettano le varie scom- 
messe. chiamate da un loop principale 
di sole tre linee (135-140). Ogni su- 
broutine costituisce un modulo a sé 
stante, cosa che offre 11 vantaggio dì un 
rapido "debug'* del programma In fase 
di scrittura, e la possibilità di operare 
modifiche al listato senza troppe diffi- 
coltà, La sezione del programma che 
presiede all’analisi delle giocate dopo 
l'estrazione del numero è per forza di 
cose strutturata diversamente: rac- 
chiusi in un loop principale si trovano i 
vari moduli che verificano se le giocate 
fatte debbano essere considerate vin- 
centi oppure perdenti. 
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Tutti i numeri giocati sono organizzati sentire solo un certo numero di gioca- Infine, una raccomandazione: alcune 

in un unica matrice nm%(x,y) h per una te per opzione scelta. In precedenti linee eccedono In lunghezza gli ottanta 

maggiore pulizia del listato e per otte* esperienze di gioco con versioni di caratteri standard del C64, quindi per 

nere una maggiore velocita dal prò questo programma strutturate diversa- poterle battere correttamente occorre 

gromma, (non ultimo per non dovere mente, mi sono accorto però che un ricorrere alle forme abbreviate delle 

sprecare Kbytes, problema questo non numero superiore di possibilità di glo- parole chiave* Tali forme sono riporta» 

molto sentito sul C64 ma sempre da cale, oltre ad essere poco utilizzato, te sul manuale in dotazione al compu- 

tenere presente per una buona prò- rallentava notevolmente LI gioco stes- ter. Ricordate Inoltre che per queste II- 

gremmazione). L ammontare delle so (specialmente essendo In tanti a nee il numero di checksum visualizza» 

puntate è Invece memorizzato In una giocare contemporaneamente). Que to daN'OK-UST non corrisponde a 

matrice parallela La scelta ste matrici sono Inoltre dimensionate quello pubblicato, quindi richiedono 

* m * r t c * Principali, of- automaticamente dal programma In particolare attenzione nella battitura* 

tre ad offrire I vantaggi sopra descritti* funzione dei numero dei giocatori, per Detto questo* non mi resta che augura» 

presenta tuttavia la limitazione di con- un ulteriore risparmio di memoria. re a tutti buona fortuna! , 


Roulette per G64 


0 REM *********************** :rem 218 

1 REM * * :rem 105 

2 REM * ROULETTE PER C64 * : rem 114 

3 REM *DI M. CRISTUI B GRXZZI* : rem 183 

4 REM * 6 II PERVIO #2 * :rem 50 

5 REM * * ;rem IQ9 

6 REM *********************** 224 

7 REM ;rem 27 

8 REM t rem 28 

’9 REM i rem 29 


10 POKE5 3 280,0: PO RE 51 28 1 r 0 : POKE5 3 272,23 

: rem 179 

20 PRIHT" {CLR} (BLU) [<*>){ 37 *)[<S>]- 

: rem 3 

21 PORI-1TO20 s FRI HT" - "TAB ( 38 ) : KEXT 

e rem 27 

22 PRIHT"[<Z>|{ 37 *lfCX>3“ tram 95 

23 PRIHT* {HOME} ( ll“0ES}| 8 GIU'){RVS} 

{ WHT ) R { SPAZI } O C SPAZ I ) U ( SPAZI 1 L t SPAZ I } 

E { SPAZ I ) T{ SPAll ) Tf SPAI I } E (OFF!" 

: rem 141 

24 PRINT" { 2 GIU'M 11 DBS) {GRU )B5f SUPER 

VIC » 2 [WHT } " tedi 18 

25 FORW-lTO2000:NEXT treni 241 

26 Pl-35:P2«17tP3-lliF4-8iPS-5:P6»2tP7«2: 
P8-ltP9-l:A$-" VOLTE + LA POSTA" 

tram 88 

30 PRINT" (CLR) VUOI LE ISTRUZIONI?" 

tram 122 

31 GBTW3iIFW$<>"S"ANDt($<>"N"THBN31 

: rem 1 

32 I PW? • " S "THENGOSUB 3 00 0 0 treni 229 

120 POKE53281,0:PRINT"{CLR)l<8>] QUANTI G 

10CAT0R1 tram ll6 

121 INPUTNP : IFNP-0THEN121 tram 89 

124 DIKNKt (45, NP) ,TI ( 45, NP) ,PUt(NP) ,C(NP) 

,2X1(5) tM-1000 tran 47 

125 rORI-lTONP; PRIHT" (GIU 1 }"ITAB( 3) t INPUT 

"NOME, PREGO" ;NO$ ( I) tram 51 

130 INPUT" CAP ITALE DI f SPAZI J IMIZIO" ; Ai PO» 

(i) -k/nnnnn ht-puhd : reirt shextìg- 

ì treni 75 

135 FORPL-1TOHP: Z“0 i IFPU4 (PL) «0ANDC (PL) -0 



THEH140 

: rem 

237 

137 

GOSCJB5000 . 

: rem 

224 

140 

HEXTP L ; GOTO 550 

: r em 

125 

15Q 

REM SUBR* GIOCATA PIENI**** 

trem 

249 

155 

GOSUBlOOOO : PRI NT" (GIU 1 } QUANTI PIENI G 


IOCHI7 (MAX. 09) "} 

: rem 

106 

165 

INPUTAS tN-VAL (A?) :FORI«OTON- 

1 :PRINTI+ 



:rem 

188 

170 

I NP UT" NUMERO E PUNTATA" ; NMl ( I , PL) 

,A:T 


» ( I , PL) -A 

: rem 

1 


175 Z-Z+A*Mt KEXT: RETURN tram 4 


180 REM SUBR. GIOCATA CAVALLI**** ! reta 131 
185 GOSUBlOOOO tPRINT" {GIU* } QUANTI CAVALLI 
GIOCHI? (MAX. 06) ») tran 241 

200 I NPUTA8 : N ■ VAL ( A$ ) tW-9 tPORl-lTON 

tram 181 

205 PRINTI } : INPUT" NUMERI E PUNTATA" )NMt (H 
,PL) , NMt (W+l, PL) ,AiTl(W,FL)-A 

Iran 25 

206 Z»Z+A*MiW-W+2tHEXT: RETURN treni 129 
210 REM SUBR. GIOCATA TERZINE**** tram 162 
215 GOSUBlOOOOt PRIHT" {GIU' ) QUANTE TERZINE 

GIOCHI? (MAX. 06)") tram 12 

225 INPUTA$ :N*VAL(A9) SFORI-21TON+20 

tram 116 

230 PRINTI-20) t INPUT"NUH. PIU ' BASSO E PUNT 
ATA" ; NMt ( I , PL) , A : Tl ( I , PL) "A tram 173 
235 REM CONTROLLO INPUT tram 202 

240 F0RW-1T034STEP3: IPW»HM% ( I ,PL> THEN250 

iram 0 

245 HEXT:PRINT"{RVS INUMERÒ NON CONGRUENTE 
(OFF) RIPETERE I " : GOSUB1 100 : GOTO230 




: rem 

73 

250 

Z“ Z+A*Mt NEXTI : RETURN 

: rem 

71 

260 

REM SUBR. GIOCATA CARRÉ 

***** : rem 

26 

265 

GOSUBlOOOO tPRINT" (GIU* 

) QUANTI CARRÉ* 


GIOCHI? (MAX. 06)"; 

:rem 

136 


275 INPUTAS :N-VAL ( AS ) iFORI-27TON+26 

tram 133 

2B0 PRINTI. 26 ; lINPUT"NUM. PIU' BASSO B PUNT 
ATA")NH»(I,PL) ,AtT8(I,PL)-A tram 184 
285 REM CONTROLLO INPUT tram 207 

290 F0RW“3TO36STEP3 : IFNMt ( I ,PL) -MORNNI (I, 
PL) -340RNM3 ( I , PL) “35THEN299 tram 229 
295 NBXT:GOTO300 tram 229 

299 PRI NT " { RVS } NUMERO NON CONGRUENTEtOFF) 

RIPETEREI " tGOSUB 1100 t GOTO 2 80 

tran 222 

300 Z-Z+A*MtNEXTI: RETURN treni 67 

310 REM SUBR. GIOCATA SESTINE**** 

tram 157 

315 GOSUBlOOOOt PRI NT" (GIU’ ) QUANTE SESTINE 
GIOCHI? (MAX. 06)") trem 7 

325 INPUTA8 iN-VAL (A$) iFORI-33TON+32 

tram 123 

330 PRINTI - 32 )IINPUT"NUM. PIU 'BASSO E PUNT 
ATA" ) NMl ( I , PL) , AlTt ( I , PL) "A tram 177 
335 REM CONTROLLO INPUT tram 203 

340 FORM«lT034STEP3t IFW-NMt (I ,PL) THEN350 

I rem 2 

345 NBXTt PRI NT" (RVS INUMERÒ NON CONGRUENTE 
(OFF) RIPETERE I * iGOSUBUOO :GOTO330 

tram 75 

350 Z-Z+A*MtNEXTI: RETURN tram 72 

360 REM SUBR. GIOCATA COLONNE**** i rem 149 
365 GOSUBlOOOO tPRINT" (GIU 1 (QUANTE COLONNE 
GIOCHI? (MAX. 2) " ) tran 203 


50 supomc* ui 



375 

380 

381 


I NFUTA$ : N - VAL ( A$ ) : POR 1-4 1TON+4 0 


126 


INPUT"COLONNA E PUNTATA" ; A? , A :TI ( 1 , PL 
)«A ; rem 123 

IFA$<> "A"ANDA$< >"B" ANDA$< > "C"THENPRIN 
T" { RVS } NON CONGRUENTE {OFF} RIPETERE 11 : 
G0T038Q :rem 247 

385 IFA$«"A" THENNM4 ( I , P L ) ■ 1 :rem 21 

390 IFA$-"B"THENNMI(I,PL)«2 : rem 19 

395 IFA$-"C"THENNM% (I,PL) «3 : rem 26 

405 Z-Z+à*M:NEXTI: RETURN : rem 73 

410 REM SUBR. GIOCATA DOZZINE**** : rem 166 
415 GOSUBlOOOO: PRINT" {GIU 1 } QUANTE DOZZINE 
7 (MAX. 2) ** ; m rem 41 

425 INPUTAS : N-VAL ( A$ ) : FORI «39TON+ 30 

: rem 136 

430 INPUT™ DOZZINA £ PUNTATA" ; NMI { I , PL) , A: 

TI ( I , PL) -A : rem 73 

435 REM CONTROLLO INPUT : rem 204 

440 IFNHl il , PL) < > 1ANDNMI ( X # PL} <> 2ANDNMI ( I 
,PLK>3THENPRINT"{RVS)N0N CONGRUENTE 



{OFP} " i GOTO! 30 

: rem 

202 





450 

Z-Z+A*M:NEXTI : RETURN 

: rem 

73 

576 

FORI -1TO10: PRINT" {CLR5 ( 

Il GIU'} 


460 

GOSUBlOOOO: REM GIOCATA 

PASSE -MANQUE 


{ 12 DESI [RVSHYEL) A( 2 

T)ENDERE 

PRE 



: rem 

145 


GO { OFF } c < a > ) 11 :FORW*TtO1Q0:NEXT 


465 

INPUT" {GIU' 1 PASSE O MANQUE? fP/M) E 

! PU 



: rem 

130 

i 

NTATA"; A$ , A: TI (43* PL) -A 

: rem 

146 

577 

PRINT" {CLR) ":FORW=lTO100 

: NEXTWf I 


466 

IFAS < > " P " AND A$ < > "M" TK8NPR INT" { RVS 1 NON 



: rem 

102 


CONGRUENTE { OFF} RIPETERE" :GOT04fi5 

580 

FORPL-lTONP: PRINT" {CLRÌ " 

: IFPUl { PL) *0A 



:rem 

224 


WDC (PL) «OTHEN10B5 

: rem 

199 

467 

Z*Z+A*M 

: rem 

117 

585 

PRINT" {YEL} ************* 



475 

IFA$-"P"THENNM%{43,PL)« 

ls RETURN 



USCITO IL {RVS} [<5>J "X" [<8>] " 




: rem 

92 



: rem 

78 

480 

NM% ( 43 , PL) »2 :RETURN 

: rem 

101 

586 

PRINTPDS;" ”;RN$;" " ; PM$ 

COL. " 

?CO$ 

490 

GOSUBlOOOO: REM SUBR. GIOCATA PARI-DISP 


: PRINT 

: rem 

36 


ARI E COLORE 

: rem 

252 

590 

PRINT"RISULTATI{ SPAZI} DI 

{RVS} [<?>} "N 

495 

INPUT" {GIU* }P/D O R/N , 

PUNTATA™ f A$ 

,w 


OS ( PL) "{GIU 1 } (<8 > ) " 

: rem 

39 



: rem 

212 

595 

REM PIENI**** 

: rem 

164 

497 

Z-Z+W*M 

: rem 

142 

600 

FORW-0TO8: IFTI (tf, PL) » 0THEN6 50 


505 

IFAS-"P"THEN»M% {44 , PL) » 

1 :TI ( 44 , PL) 

-tf: 



: rem 

5 


RETURN 

; rem 

31 

605 

IFX-NMI (W,PL) THEN62 0 

: rem 

182 


506 IFA$-"D"THENNMI (44,PL> -2:T%(44,PL) «tf: 

RETURN : rem 21 

507 I FA$ - " R" THEMNMl ( 4 5 , PL ) ■ 1 ; Tt { 4 5 , PL) «W: 

RETURN : rem 37 

508 IFA$«"N"THBMNM%{45 f PL) -2:Tt (45,PL) -tf: 

RETURN :rem 35 

510 PRINT" {RVSjNON CONGRUENTEtOFF} RIPETE 
RE": Z»Z-W*M:GOT0495 tre» 139 

550 REM ESTRAZIONE E CLASSIFICAZIONE 

: rem 30 

551 IFZXMTHENZX-0 : rem 156 

559 X-INTtRND (TI l ) *37) : ZXl ( ZX) -X : ZX-ZX+1 

:rem 186 

560 I FX< 1 9THENPM$ - ™ PA { 2 S}E":GOTG562 

:rem 165 

561 ?M$ ■ " MANQUE " :rem 165 

562 I FX/ 2 « I NT ( X/ 2 ) THENPDS- " PARI " : GOTO 564 

:rem 189 

563 PD$- "DISPARI * : rem 99 

564 FORI -1TO35STEP2 : IFX-ITHENRNS- " NERO ": G 

OT0566 tre» 25 

565 NEXT:RN$-*RO{ 2 s}0“ : rem 116 

566 FORI «1TQ34STEP 3 : TFX- ITHENCOS - "A™ : GOTO 

569 :rem 157 

567 1 1 - 1 + 1 : 1 FX- 1 ITHENCOS - " B " : GOTO 569 

: rem 69 

568 NEXT : CO$ ■ "C ™ : rem 22 

569 IFX-OTHENPD^-"" :RN$- H ":CO$»"":PM$-" n 

: rem 204 

570 REM VIS U ALE Z AZIONE**** : rem U8 



610 PRINT " PIENO rt T AB (10) NM% ( W, PL) TAB ( 30 ) "P 
EROE" : PUH PL)«PU% (PL) ~TI (W,PL) ;GOT062 
5 : rem 230 

620 PRINT" P IENO"TAB (10) NMt ( W , PL ) TAB (30)™* 
VINCE ! "s PUI (PL) =PU% (PL) +Pl*Tl (tf ,PL) 

;rem 80 

625 HEXTff ; rem 51 

650 REM CAVALLI**** srera 35 

655 FORW-9TO20STEP2:XFT% (W,PL) «0THEN700 

:rem 172 

660 IFX-NMI (tf , PL) ORX-NMl (W+l f PL) THEN67 5 

:rem 131 

665 PR I NT"C AVALLO " TAB (10) NM 1 (W,PL) " NMI { 
tf + 1 , PL) TAB (30)" PERDE 11 ;rem 105 

670 PUI £ PL) -PUI(PL) ~T% (W , PL) :GOTO690 




: rem 

112 

675 

PRINT "CAVALLO "TAB ( 10 ) NMI (W# 

PL) 

NMI ( 


W+l t PL) TAB ( 30) ™ *VINCE" 

:rem 

25 

680 

FUI (PL) -PUKPL} +P2*T?| {W f PL) 

: rem 

9 

690 

NEXTW 

: rem 

53 

700 

REM TERZINE**** 

:rem 

68 

705 

F0RW-21TO26: IFTI (W,PL) =0THEN75O 




: rem 

111 


710 IFX=NM4 (W, PL) ORX-NMl (W,PL) +10RX=NM% (W 
t PL) + 2THEN72 5 :rem 62 

715 PRINT "TER 3 INA "TAB { 10) NMI (W,FL) NM% (W,P 
L) +1NM% (W, PL) + 2TAB (30) M PERDE 1 ' 

: rem 156 

720 PUI (PL> -PUI (PL) “TI (W,FL) :GGT0735 

: rem 108 


StìPtPWC ^ 51 



725 FBI NT " TERZ I N A " TAB (10) NMI (W,PL)NM% (W,P 
L)+lNMl (W, PL) +2TAB ( 30 J 14 * VINCE 11 

srem 76 

730 PU%(PL)-FUl(PL)+P3*Tl(W,PL) :rem § 

735 NEXTW trem 53 

750 REM CARRÉ'**** : rem 186 

755 FORW- 27T032 ; IFTI <W, PL) «0THEN79O 



i 

srem 

123 

760 

A» NMI (W, PL) ! I FX-A0RX-A+10RX-A+30RX-A+ 


4THEN775 

trem 

58 

765 

PRI NT "CARRÉ ' "TAB (10) A; A+ 1 ; A+ 3 ; A+4TAB ( 


30) "PERDE" 

: rem 

157 

770 

PU* (PL) -PU* (PL) -T* (W, PL) 

SG0T0785 




:rem 

118 

775 

PRINT "CARRÉ 1 "TAB ( 10 ) A ; A+l ; A+ 3 ; A+4TAB ( 


30) "•VINCE" 

: rem 

77 

780 

PUI (PL) -PU* (PL) +P4*Tt (W, 

PL) : rem 

12 

785 

NEXTW 

; rem 

58 

790 

REM SESTINE**** 

; rem 

71 

795 

F0RW-33T038:IFT* (W,PL) -0THEN8S0 




s rem 

127 

800 

FORI -NMI (W r PL) TONMI (W, PL) +5; IPX- ITHEN 


81S 

; rem 

230 

805 

NEXTIsA-NM* (W,PL) : PRINT" 

SESTINA”TAB (1 


0) A"-"A+STAB(30) "PERDE" 

: rem 

74 

810 

PU* (PL) -PU* (PL) -T* (W ( PL) 

: GOTOS25 




s rem 

108 

815 

PRINT"SESTINA"TAB(10) A"- 

" A+5TAB ( 30 ) " * 


VINCE" 

;rem 

80 

320 

PU% ( PL) -PU%(PL)+P5*T1 (W, 

PL) irem 

8 

825 

NEXTW 

s rem 

53 

850 

REM COLONNE**** 

srem 

55 

855 

FORW- 4 1T04 2 : 1 FT t { W , PL ) -OTHEN860 




srem 

121 

856 

IFNM*(tf,PL) -1THENA$«"A" 

srem 

166 

857 

IFNMl (W,PL) « 2THENA$ - " B " 

trem 

169 

858 

I FNM% ( W , PL) » 3THENAS » "C " 

trem 

172 

860 

IFCO3«A^THEN870 

trem 

83 


86 5 PEI NT " COLONNA "TAB (11) A$ TAB (30)" PERDE " 
:PU%(PL) *PUI { PL) - TI {W, PL) : GOTOB7 5 

: rem 100 

870 PR r NT "COLONNA" TAB (11) A$TAB ( 30 ) " * V1NC 
E"sPUl{PL) -PUt(PL) +P7*Tl(W,PL> 

: r e m 1 

875 NEXTW :rem 5B 

880 REM DOZZINE**** (rem 79 

885 FORW-39TO40 1 IFT% (W, PL) -OTHEN950 

: rem 127 

890 IFX>0ANDX<13ANDNM% (W,PL) -1THEN910 

: rem 251 


895 I FX> 1 2 ANDX< 2 5 ANDNM 1 { tf , PL) «2THEN910 

srem 55 

900 XFX>24ANDNM%(W,PL) «3THEN910 ! rem 96 

905 PRINT"DOZZINA"TAB (10) NMI (W , PL) TAB ( 30) 
" PERDE" : FUI ( PL) -FUI ( PL) -TI t W r PL) 

; rem 129 

906 GOTO920 trem 115 


910 

PRINT"DO2ZINA"TAB(10)NM* (W, 

PL) TAB (30) 


"•VINCE" 

; rem 

49 

915 

PUI ( PL) -PUI(PL) +P6*TI{W,PL) 

; rem 

14 

920 

NEXTW 

: rem 

49 

950 

REM PASSE-MANQUE**** 

trem 

154 

955 

IFTI { 43 # PL) -0THEN990 

s rem 

105 

960 

IFNMl (43, PL ) ■ lTHENA$ - "FA { 2 

S}E" 



srem 

237 

965 

IFNMl ( 43 , PL) - 2THENAS - "MANQUE " 

: rem 

190 

970 

IFPK$«A$THEN980 

trem 

98 

975 

PR1NTA$TAB (30) "PERDE" SPUt(PL) «PUl(PL) 


-TI (43,PL) : GOTO990 

s rem 

246 



980 FRINTA$TAB(30)"* VINCE w sFUl(FL) »PUt{PL 
)+Tl(43,PL) ; rem 138 

990 REM PARI DISPARI**** :rem 102 

995 IFT%(44 f PL)«0THENl025 :rem 148 

1000 IFNMI { 44 , PL) » 1THENAS * " PARI " ; rem 64 

1005 IFNMI(44,FL) - 2THENA$« " DI SPARI " 

: rem 166 

1010 IFPD$«A$THBN1020 : rem 157 

1015 PRINTASTAB (30) "PERDE" : PU% ( PL) -PUI ( PL 
) -TI (44, PL) :GOTQ1025 : rem 63 

1020 PRINTA$TAB ( 30) "» VINCE " S?U1 (PL) *PUi(P 
L)+TI(44,PL) :rem 173 

102 5 REM COLORE**** 5 rem 24 

1029 IFT%(45,PL)«OTHEN106O : rem 185 

1030 IFNM%(45,PL>«1THENA$-"R0{ 2 S}0" 

: rem 46 

1035 I FNM% ( 45 , PL) ■ 2THENAS «"NERO" trem 82 

1040 IFRNS-A6THEN1050 :rem 175 

1045 PRINTASTAB ( 30) " PERDE" : PU% (PL) *PU% ( PL 
)-TI(45,PL) :GOTOlQ60 : rem 66 

1050 PRI NTA$ TAB (30)" * VINCE" : PU I < PL ) • PUI ( P 
L) +TI { 45 * PL) trem 177 

1060 REM ESITO GIOCATA**** : rem 207 

1065 E«PU*{PL)~PI(PL) :E$-STR$ (E*1000> :IFE 
>*0THENÉ$-"+"+RlGHT${E$,LEN(E$)-l). 

: rem 185 

1066 PRIMT"{GIU'}B$ITO GIOCATA; "E? 

:rem 206 

1070 FRI NT" NUOVO [SFAZ I } CAPITALE : "PU% (PL) * 


1071 

1072 


1073 

1075 

LOBO 

1085 

1090 

1100 

5000 


5001 

5002 
5003 


5004 


5005 


srem 181 
:rem 71 
srem 169 
srem 101 


1000 :rem 111 

IFPUI(PL) >OTHIN1075 srem 121 

INPUT" VUOI CONTINUARE (S/N) " f R$ t IFR 
$-"N"THENPU% (PL) -OsC(PL) -0:GQT01085 

trem 36 

I N PUT " QUANTO IN CREDITO" ; Wt PUI( PL) -W 
/M:C (PL) *C(PL) +W1GOTO1085 :rem 69 

PRI NT” { 25 DESJtRVSj PREMI UN TASTO 
{OFF}" srem 194 

GETA$ : IFA$*" "THEN1080 
PRI NT" (CLR) " : NEXTPL 
G-G+l :GQSUB20000 ;GOTOl35 
FORW- ITO 1 00 0 S NEXT : RETURN 
PRI NT" (CLR) " :GOSUBGOOO : IFPU% (PL) >C(P 
L) /MANDO (PL) >0THENPUI (PL) -FUt (PL) -C ( 
PL)/MtC(PL) -0 srem 14 

PRI NT" {HOME} GIOCATA N-"G"DI {RVS} 
£<7>] "NO$ (PL) " lOFP'y [<8>J ■ s rem 129 

PRINT" {GIU* } PREMI { RVS } I < 7>] 1 {OFF } 
[<8>J PER NUMERI PIENI" ;rem 92 

PRINT" PREMI { RVS } [ < 7 > ] 2 { OFF } [ < 8 > ] PE 
R CAVALLI" SPRINT"PREMI {RVS}[<7>33 
(OFF}[<8>] PER TERZINE" : rem 160 

PRINT "PREMI { RVS } [ < 7 > ] 4 { OFF } [ < 8 > I PE 
R CARRÉ» "SPRINT" PREMI {RVS}{<7>]5 
{OFF} [<8>] PER SESTINE" : rem 55 

PRINT" PREMI {RVS} (<7>]6{OFF} [<8>] PE 
R DOZZINE "SPRINT "PREMI {RVS} [<7>]7 
{OFF} f<6>) PER COLONNE" s rem 190 
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5006 PRI NT" PREMI i RVS } [< 1> ] 8 {OFF } [ < 8> ] PE 
R PASSE/MANQUE" tPRINT"PREMI {RVS} 
t<7>] 9 [OFF} [<B>] PER P/D E R/N" 

:rem 219 

5007 PRI NT" PREMI { RVS } [ < 7> } 0 {OFF J [ < S> ] PE 

R FINE GIOCATA" . trem 36 

5008 PRI NT n {GIU * } TOT- PO{ 2 S) SPUTO A 

{ 2 T}UALKENf|T T~DES} ir PU%(PL) *1000 

:rem 56 

5009 IFPU1 (PL) >-0THENPRI NT" DISPONIBILE D 
A GIOCARE ( 5 DBS}"PUl(PL} *1000-2 

trem 42 

5010 IP ( PU% { PI*) * 1000- Z ) >-QTHEN5013 

trem 114 

BOLI PRINT" {RVS ! GIOCATA [SPAZI} SUPERIORE 
(SPAZ I } A{ SPAZ I } QUANTO { SPAZI } PO 
{ 2 S } EDUTO ( SPAZ I } E { DBS } PERTANTO 
{ $PAZ iTNÉtTSFAZ I } Al 2 C } E i 2 T} ATA-- 
RXPE ~ trem 203 

5012 FORI * ITO 2 0 0 0 : NEXT t Z - Q t GOTO 5000 

trem 125 

5013 IFC (PL) >0THENFRINT" { RVS} { YEL} DEBITO 

"TAB(27)C{PL> " [<8>J " trini J53 

5019 GETW$ : IFtfS * " "THEN5019 treni 237 

5020 IFW? - " { FI } "THENPRINT" {CLR} " tEND 

trem 123 

5021 I FWg « " 0 "THENPRI NT " TOTALE GIOCATO 

{ 13 DES } [ GRN } " Z " I < 8 > ] *Tfq 5 I ■ lTOl 0 0 0 
: NEXT: RETURN trem 113 

5022 ONVAL(W$)GOSUB1 50, 180,210,260,310,41 

0,360,460,490 trem 72 

5023 GOTO 5000 : rem 200 

6000 REM NUMERI USCITI ! rem 75 

6005 PRINT" { 21 GltTjULTIMI 5 NUMERI USCI 

TI:" treni 229 

6010 FORI-0TO4 tPRlNTZXl ( I) ; tNEXT : PRINT" 

{HOME RETURN :rem 95 

6011 FORI “0TO4 : PRINTZX% ( I } ; tNEXT t PRINT" 

{HOME}": RETURN t rem 96 

6020 FORI * 0TO4 t P RI NTZ X % ( I } ; : NEXT t PRINT" 

{HOME}"! RETURN treni 96 

10000 REM SLFBROUTINB TAVOLO VERDE 

: rem 43 

10001 PRIKT"{CLR}{ 2 SPAZI) (YEL) [<A>] 

{ 14 *}[<»>){ 17 *)I<S>]" -.te m 68 

10002 PRINT^f 2 SPAZ I ) { YEL) - { WHT ) 

{ 2 SPAZ 1 ) P A S S E{ 1 SPAZI) {YEL) 

- {WHT } { 2 SPAZI )M A M Q U E 
T 4 SPAZIHO-" : rem 231 

10003 PRINT" {YEL}{ 1 SPAZI H<Q>1{ 8 *) 
[<R>] ( 5 *} [<E>J { 5 *} [ <R> ) 

{ 11 *} [<«>)" : rem 150 

10004 PRINT w {YELH 2 SPAZI)-{ 2 SPAZI) 

(WHT) FIRST (YEL}-{ 2 SPAZ I }{ WHT } SEC 
ONDE 3 SPAZI){YEL}-{WHT] {DES) THIR 
D{ 3 SPAZI) {YEL}-" : rem 157 

10005 PRINT" {YEL} £ < A> ] *+ * [ <R> ] * [ <R> ) * 

[<»>){ 2 *)+{ 2 t TT<R>] { 2 *)[<R>) 

{ 2 *}[<»>)! 2 *T+{ 2 * } t < R > 1 

{ 2 I)[<R>]{ 2 T)f<R>)I 2 *}+M<S>] 
" :rem 177 

10006 PRINT" {YEL)- - {< 5> ) 3 { YEL) - [ < 3> ] 6 

{YEL)- [<5 >]T{YEl 1- [<3>] 12TYEL}- 
[<5>]T5{YEL3- [<3>Tl8{YEL)- [<5>T21 
{YELl- [ < 3 > ] 2T { YEL } - [ < 5 > ] 2? { YEL } - 
[<3>]l0(YEL)- [<5>]T3£YEL)- [<3>]T6 
{YEL)-{wht)cTyel)-" :rern 243 

10007 PRI NT t £ YEL ) - {<Q>T*+*+*+{ 2 *} + 

{ 2 *}+{ 2 *} + { 2 *)+{ 2 *)+ 

{ 2 *} + { 2 *} + { 2 f) + l 2 f}+M<W>l" 

:rem 102 


1000 B PRINT " { YEL ) - { WHT }0{YEL}-[<3>]2{ YEL ) 
- [<5>] 5{YBLT- t<3>] 8{YELT- [<5>1 11 
Tyel) - [< 3>] lT{YEL) - {<5>)T7 {YEL}- 
[<3>]T0 {YEl}- [<5>]73{YED- [<3>]T6 
{YEL)- [<5>] 2?{YEL}- [<3>] 3l{YEL)- 
[<5>)75{YEL}_- {WHT}B{ YEL}-" : rem 196 

10009 PRINT" { YEL ) - t <Q> 1 * + * + *+T 2 *) + 

{ 2 M + { 2 *) + ( 2 *}'+r5 *3 + 

{ 2 _*} + { 2 *}+£ 2 *}+{ 2 *}+M<W>)" 

:ren 104 

10010 PRINT" { YEL) - < 5> ) 1 { YEL) - { < 3> J 4 

{YEL)-[<5>]7{YEL)-t<3>lloTYEL)- 
[<5>]T3 {YElJ- {< 3>Tl6{YEL)-t<5>Tl9 
{YEL)- [<3>] 2T{YEL)-{C5>]2'5(YEL)- 
[<3>]5 b [ YEL)- {< 5>)Tl {YEL}- (<3>)T4 
{YEL)-{WHT)aTyel}-" _ :rem 230 

10011 PRINT^ÌYEL) 1<Z>]*T<E>]*[<E>]*[<E>] 
*[<E>]{ 2 *}[<E>T{ 2 *Tt<E>] 

T 2 *}[<E>T{ 2 •}[<E>T( 2 * } [ <E> 1 
{ 2 t )[<E>]{ 2 T )[<E>]{ 2 *}[<E>) 

{ 2 3) 1<E>] * [<X>] I<8>] "! RETURN 

trem 190 

20000 REM SUBR. INI Z IALI ZZAZ , VARIABILI 

treni 169 

20005 FORI ■ lTONP t Pi (I) «PU% [I) :NEXT 

treni 57 

20015 FORW- 0TO4 5: FORI- 1TONP tNMl (W, I) -OtTl 
(W, I) -0 tNEXT tNEXT 5 rem 123 

20020 W-OtN*0: A-0; A3*"" t CS-""tN$- " 11 
:M$- " " : rem 126 

20025 RETURN trem 217 

30000 POKE532 81 , 1 : PRINT" {GRN } " f trem 230 

30010 PRINT" {CLR} {RVS} ISTRUZIONI {SPAZI }D 
I {SPAZI }G!OCO" trem 1 2 

30020 PRINT" { 2 GIU 1 }TUTTE LE PUNTATE VAN 
NO IMMESSE IN UNITA 1 " trem 132 

30030 PRINT"DI MILLE LIRE, TRANNE IL CAPIT 
ALE DI INI-" trem 89 

30040 PRINT" ZIO E GLI EVENTUALI CREDITI D 
EL BANCO." trem 242 

30050 PRINT" {GIU ' }FER USCIRE DAL FROGRAMM 
A PREMI PI ALLA" trem 17 

30060 PRINT" {GIU 1 } VISUALIZZAZIONE DEL MEN 
U DI GIOCO," trem 168 

30070 PRINT" { 3 GIU 1 } PREMI UN TASTO* 

trem 41 

30060 GETW$ : I FtfS - " "THEN30080 trem 69 

30090 PORE53281 , 5 : PRINT" {CLR} {WHT} {RVS} 

{ 6 GIU'H 5 DES} QUOTE {SPAZI }DI 

{ SPAZ I } PAGAMENTO " ! rem 50 

30091 PRINT" {GTU r | (CYN}**** PIENI "TAB ( 16 ) 

Pi ; A$ : PRINT" {GIU f }**** CAVA { 2 L} 
J^"TAB ( 18) P2 ; A$ trem 192 

30092 PRINT" {GIU* }**** TERZINE "T AB ( 10 ) P3 ; 

A$ trem 221 

30093 PRINT" {GIU 1 }**** CA{ 2 RjE 1 "TAB {19) 

P4;A$ : PRINT" {GIU'T^*** SESTINE"TAB{ 
1 9 ) P 5 ; A$ trem 105 

30094 PRINT" {GIU 1 }**** DO{ 2 Z} INE W TAB{19 

)P6;A$ trem 229 

30095 PRINT" {GIU 1 }**** COLO{ 2 N}E"TAB{19 

}P7;AS : PRINT" {GIUTT**** PA{ 2 S}E/ 
MANQUE "TAB(19)P8;A$ trem 66 

30096 PRINT" [GIU* }**** COLORE "TAB [ 19) P9; A 

$ trem 11 

30097 PRINT” {GIU* }**** PARI / PI SPARI "TAB [ 1 

9) P9 ; A$ trem 47 

30098 PRINT" {GIU * } { 9 DES } PREMI { SPAZ 1 } UN 
{SPAZI} TASTO PER INIZIARE " s rem T?2 

30099 A? - " " : GETA$ : IFA?*""THEN 30099 

trem 77 

30100 POKÉ 5 3291,0: RETURN trem 156 
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trad. e adatr 

di M. Criatu Ib Ori zzi 


VI tari certamente capi tata di vo- 
ler creare degli aprite con II vostro 
C64 t e trovarvi alle prese con una 
serie Infinita di POKE da calcolare. 
Questo programma modifica l'In- 
terprete BASIC ed aggiunge tre 
nuovi comandi per la completa ge- 
stione degli aprite, rendendo sem- 
plicissimo li loro uso. 


U na delle principali caratteristiche 
del C64 è la possibilità di creare 
animazioni tramite gli aprite; questi ul- 
timi. anche chiamati MQB (dall'inglese 
Movable Object Blocks), sono in effetti 
dei blocchi grafici definibili nello for- 
ma e nel colore, e spostabili sullo 
schermo. Poiché si muovono Indipen- 
dentemente dalle oltre cose che sono 
visualizzate sullo schermo ed hanno 
un movimento molto più naturale ri- 
spetto ai caratteri grafici, sono usati 
mollo spesso per creare giochi od ani- 
mazioni 

Si accede agli aprite dal BASIC tramite 
un serie di POKE: il controllare vìdeo 
(chip V1C-II) possiede molteplici regi- 
stri per la manipolazione ed il movi- 
mento degli aprite, Tuttavia II dover 
settore tutti questi registri può risulta- 
re complicato, specialmente per il pro- 
grammatore principiante che non ab- 
bia una buona conoscenza del (orga- 
nizzazione dello memoria del C64, C'è 
Inoltre la complicazione dei limite "in- 
visibile" dello schermo al 255.mo pi» 
xelìn senso orizzontale, che può esse- 
re aggirata con ulteriori orifici di PO- 
KE. 

La soluzione per una programmazione 
piu lineare e più semplice è usare que- 
sto programma con l suoi tre nuovi co- 
mandi BASIC. Poiché nel C64 è possi 
bile usare la memoria RAM no scota 
sotto la mennoria ROM, per modificare 
Il BASIC occorre ricopiarlo In RAM e 
poi operare i cambiamenti più oppor- 
tuni al r interprete. 

Sono state rimpiazzate le tre istruzioni 
LET, WA1T e VERIFY rispettivamente 
con OFF. MOVE e SPRrTE. Questo 
perché in genere le prime tre sono 


molto poco usate, ed i vantaggi portati 
dalle nuove Istruzioni non faranno cer- 
to rimpiangere il mancato utilizzo del- 
le vecchie. Molate che le nuove Istru- 
zioni sono della medesima lunghezza 
di quelle che rimpiazzano, poiché una 
nuova parola chiave deve essere map» 
pata esattamente al posto della prece- 
dente nella tavola dei comandi BASIC. 
Il programma si occupa di tutto ciò. 
nuovendo II BASIC da ROM a RAM, 
modificandolo e caricando le nuove 
routines in un'area di memoria del tut- 
to sicura; il linguaggio macchina é II si- 
stema più efficiente per programmare 
gli aprite, essendo contemporanea- 
mente veloce e molto efficiente (le rou- 
tines si estendono da SCOOO fino a 
SC0E2). 

Se, una volta cariceto ed eseguito 11 
programma, volete uscire dal BASIC 
esteso (ad esempio perché dovete fare 
un VERIFY), vi basta digitare in modo 
diretto: POKE 1.55. Per rientrare nel 
BASIC esteso invece; POKE 1,54. 11 
programma si autodistrugge una volta 
eseguito in modo da lasciare spazio ai 
vostri, quindi al solito provvedete a re- 
istrarlo prima di dare il RUM. 

(cordate inoltre che per usare pro- 
grammi contenenti ie nuove istruzioni, 
dovete avere in memoria ed attivato lo 
"Sprlte utility", pena messaggi di 
+ 7SINTAX ERRQR" a valanga. Ricorda- 
te Inoltre che se premete 
RUM/STOP + RESTORE disattivate li 
programma, che può essere riattivato 
con la POKE di cui sopra. 

1 nuovi comandi 

OFF (numero); 

Disabilita (spegne) lo sprlte definito 
dal numero. Gii aprite sono numerati 
da 0 a 7, cosi un numero maggiore di 7 
darà un ILLEGAL QUAMTITY 
ERROR". 

MOVE (numero), (numero), (numero): 

Abilita (accende) uno aprite e lo siste- 
ma nel posto desiderato sullo scher- 
mo. Il primo numero è quello proprio 
delio sprlte (0-7). Il secondo ed il terzo 


sono le coordinate X ed Y dell'angolo 
superiore sinistro dello sprlte. Poiché 
l'area nella quale è possibile sistemare 
uno aprite é più estesa di quella visibile 
sullo schermo, la coordinata X deve 
valere come minimo 24, mentre la Y 
deve valere come minimo 50 per ren- 
dere lo aprite totalmente visibile, I va- 
lori ammessi per la coordinata X sono 
da 0 a 5 11 , anche se valori superiori a 
344 sono totalmente al di fuori dello 
schermo. La Y può variare da 0 a 255, 
con valori superiori a 250 compieta- 
mente fuori dallo schermo. Ogni nu- 
mero esterno all'Intervallo consentito 
provocherà un messaggio "ILLEGAL 
QCJANTITY ERROR". 

SPRITE 

(numero), (numero), (numero), (nume- 
ro): 

Definisce uno sprìte. Il primo numero è 
quello dello sprlte che si vuole definire 
(0-7): Il secondo rappresenta il blocco 
dati di 64 byte dove sono memorizzati 
1 byte che definiscono la forma dello 
aprite. Questo numero può variare da 

0 a 255. Ad esempio, blocco n, 13 ìndi- 
ca che I dati sono memorizzati nel buf- 
fer del registratore (dee, 832 895) in 
quanto 832/64-13. Il terzo numero 
rappresenta 11 colore dello sprlte. I co- 
dici del colore sono: 

Onero 4 viola Sarancìo !2grigio2 

1 bianco Sverde 9marrone 13verdec. 
2 rosso GbJg lOrosso codazzurro 
3clano TgialJo I Igriglol 1 5grigio3 

Il quarto numero definisce la misura 
dello sprlte, secondo lo schema se- 
guente: 

0: normale 

I : doppia in larghezza 
2:doppia In altezza 

3:doppla sla in altezza che In larghezza 

U creazione degli Sprlte sul 
C64 

Creare uno sprlte è come creare un ca- 
rattere grafico; deve essere disegnato. 

II C64 non la fa per voi: dovete mettere 
delle istruzioni DATA in un program- 
ma ìn modo che il computer le legga e 
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quindi disegni io iprite sullo schermo. 
Uno iprite è più grande di un carattere 
grafico, consistendo in un blocco di 24 
pixel In larghezza per 21 pixel in alte*» 
za, contro misure di 8x8 pixel di un ca 
ratiere grafico. A causa di queste mag- 
giori dimensioni, Je informazioni me- 
morlzzate per crearne il disegno occu- 
pano più memoria, e quindi è possibile 
avere sullo schermo un numero massi- 
mo solo di otto sprite contemporanea- 
mente. Proprio come quando create 
un carattere grafico. Il sistema miglio- 
re è usare della carta millimetrata per 
disegnare la forma dello iprite, divi- 
dendola In 2 1 righe per 24 colonne (Fi- 
gura 1). Riempendo i quadratini, sapre- 
te quali pixel dovranno essere accesi 
(cioè del colore scelto per lo iprite), e 
quali invece spenti (del colore di sfon- 


do delio schermo). 

Fatto ciò, bisogna codificare queste In- 
formazioni in modo che siano compre- 
se dai computer: basta fare qualche ad- 
dizione per settare i bit nel modo ap 
proprlato. La Figura 2 mostre II proce- 
dimento; ogni quadratino rappresenta 
un pixel dello sprite. Orizzontai mente, 
i 24 pixel possono essere divisi I tre 
blocchi di 8 pixel ciascuno, detti ri- 
spettivamente blocco A, B f e blocco C 
Quando 11 C64 legge i dati per creare 
uno sprite, inizia con il primo blocco di 
8 bit nell'angolo superiore sinistro e 
procede con i due blocchi successivi 
prima di passare alla seconda riga. 
Calcolare I valori dei bit di ogni blocco 
è semplicissimo: basta, con un occhio 
ai la figura 2, sommare per ogni blocco 
i valori associati ad ogni pixel (o bit) 


che si vuole acceso. La Figura 3 mo- 
stra i valori calcolati per lo sprite di Fi- 
gura 1 : Ja prima riga non ha pixel acce- 
si. quindi il valore di tutti e tre i blocchi 
(o byte) è 0. La seconda riga ha sei pi- 
xel accesi nel blocco B; questi bit, nu- 
merati da 1 a 6, hanno un valore totale 
di 126 (2 + 4 + 8+ 16 +32 + 64 - 128). 
Gli altri due byte rappresentanti i bloc- 
chi A e C avranno valore 0 (nessun bit 
acceso). 

Ogni byte è calcolato allo stesso mo- 
do. 

Ricordate che ogni riga dello sprite 
consiste di tre byte, ed ognuno di que- 
sti deve essere calcolato separatamen- 
te. Una volta finito di calcolare lo apri- 
te, vi ritrovate con 63 numeri che lo 
definiscono completamente e vanno 
messi in Istruzioni DATA. 
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Sprite Utility per C64 


10 A*0 : POKE532BO ,0: POKE53 261,0 : reo 158 

20 PRINT" (CLR) (RVS) (RED) { 4 SPAZI ) ESTENSI 
ONE DEL BASIC PER SPRITBS{ 4 SPAZI}" 

: rem 57 

21 PRINT" {GIU' JtCYN) SINTASSI COMANDI 1 " i PR 

INT" ( < 17 T> ] " : rem 101 

22 PRINT" {GIU' } (RVS) OFF N(OFF} ( DI SABILIT 

A SPRITE t N)" : rem 130 

23 PRINT" (GIU’ ){ RVS) SPRITE N,B,C,D(0FF) ( 

ABILITA SPRITE t( 2 SPAZI } N) PRINTTAB 
(16)"B-BLOCCO DI MEMORIA" ! rem 78 

24 PRINTTAB (16) "C-COLORE SPRITE (0-15) ":P 
RI NTTAB (16) "D-DIMENS IONI (0,1, 2, 3) * 

;rets 154 

25 PRINT" {GIU 1 } {RV$)MOVE N,X,Y(OFF) (HUOV 
E SPRITE # N)";PRlNTTA8(12)"0<-X<-344 

S 0<-Y<-250 " : rem 152 

26 PRINT" {GIU 1 } { YEL } ATTENDERE PREGO,** 

fCYNj" :rem 42 

30 FORI -4C960TO4 9151 : POKEI , FEEK (1 ) xHEXTl 

: rem 217 


supervk:» 2*4.35 






Rita Bona! ti - Dan* Gianni 
ALLA SCOPÈRTA DEL 
VIC 20 

Un teste chiave par 
imparare a conoscerà e 
u sa re uno dei Faraona! da! 
momento. 

306 pagine L, 22*000 
Codice 3380 
Cassetta Programmi 
L 15.000 
Floppy Programmi 
L 25,000 

Gaetano Marano 
77 PROGRAMMI PS) 
SPECTmJM 

Dalla Grafica alia Business , 
Grafica, dalia musica alle 
animazioni, dai giochi 
aJI'eleftronica,-. tutta la 
possitxlttà offerta dal più 
piccolo dai computar, 

150 pagina a colori 
L 10 000 
Codice 555A 

Nicola Brteud-PouJiquen 
LA PRATICA DELL'APPLE 
"I Sistema APPLE W\ 
il "BASIC AppleeofT, 
il disegno e la grafica: 
arricchiti da esempi « 
esercizi 

130 pagine L 10.000 
Codice 341D 



Giacomino Baiami 
Giò Federico Baglioni 
IL FOftTH PER VIC 20 E 

CBMB4 

La programmazione in 
FORTH a la sua 
implementazione sul 
Commodore VIC 20 
a CBM 64. 

150 pagina L_ 11.000 
Codice 527B 

Carmina Elefante 
L'HOME COMPUTER 
TÌ/Ó9-4A 

H BASIC, it BASIC Esteso e 
il microprocessore 
deirhome computer della 
TJ. Con programmi di utilità 
e svago 

192 pagine L 15.000 
Codice 343B 

Alessandro Polistìna 
COMPUTER GRAPHICS, 
CAD, ELABORAZIONE DI 
IMMAGINI: sistemi e 
applicai toni 

Tutti gli atti del 3* Convegno 
nazionale AJCOGRAPHfCS, 
finalmente a disposizione di 
operatoli, apenment atori, 
appassionati 

512 pagine, 33 illustrazioni 
a colori U 45.000 
Codice 529C 


Hit busta chiusa, e senza Impegno, Inviale questo coupon m 
| Gruppo Editori*!* Jackson -Via RoaailW, 12 - 20124 Milano 
, □ Desidero ricevere gratui temente il Catalogo Generale 
I della Biblioteca Jackson e Informazioni sulle 10 Riviste 
| speciali etiche da voi pubblicate. 

(allego L ^ .000 in francobolli per contributo spesa dr spedizione) 
* □ Desidero ricevere contrassegno il/l volume/l 


I (pagherò ai ricevimento L * ... 

più L 2 000 par contributo spasa di spedizione) 
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SO PORI - 4 11 50T04 1 1 52 : READN : PO REI , N : HEXT 

: rem 182 

60 READL,Ht POKE40988, Li POKE40 9B9,H 

trem 27 

70 DATA79, 70,198, 2, 192 :rem 120 

90 F0RI«41189TO41192 : READN : POKEI , NtNEXT 



: rem 

202 

100 

READL,K t POKE4100B, Li FOKE41009 ,H 



t rem 

38 

110 

DATA? 7, 79,86,197,19,192 s rem 

123 

130 

FORI“41201TO4 1206 ! READN t POKEI ,N:NEXT 


; rem 

228 


140 READL,H:POKE41014,Li POKE41015 ,H 

treni 36 

ISO DATAB3, 80, 82, 73, B4, 197, 96, 192 

:rem 163 

170 FORI «49152T049384 : READN: POKEI ,N:NEXT 

: rem 2 

190 PORSI , 54 : NEW : rem 179 

200 OATA80,70,B3,32,158,183,224,8,176,31, 

189.219.192.45.21.208.141 irem 237 
210 DATA21, 208,96,32, 158, 183,224,16,176,1 

4,134,2,32,253,174,32,235 :rem 222 
220 DATAI 8 3 ,165,21,201,2,144,3,76,72,178, 

138.72.166.2.32.10.192 trem 70 

230 DATA189,219,192,45, 16, 208, 141,16,208, 

70,21,144,9,189,211,192,13 : rem 28 

240 DATA16,208, 141,16,208, 13B, 10,170, 104, 
157,1,208,165,20,157,0,208 : rem 255 

250 DATA166, 2, 189, 211, 192, 13,21,208,141,2 
1,208,96,32,158,183,224,8 trem 228 
260 DATA176, 193, 134 , 2 , 169, 24B, 133,251,173 
,24,208,41,240,9,12,133,252 trem 70 
270 DATA173,0, 221,73,255,74,102,252,74, 10 
2,252,32,253,174,32,158,183 treni 65 
280 DATA138, 164,2,145,251,32,253,174,32,2 
27,192,224,16,176,146,138,153 

:rem 179 

290 DATA39, 208, 185, 219, 192, 72, 45, 29, 208,1 

41.29.208.104.45.23.208.141 s rem 86 
300 DATA23, 208,32,253,174,32,227,192,224, 

4,116,223,134,2,70,2,144 treni 160 
310 DATA9, 185, 211, 192, 13, 29, 208, 141, 29, 20 

8.70.2.144.9.185.211.192 treni 178 
320 DATAI 3, 23, 20B, 14 1,23, 208, 96, 1,2, 4, 8,1 

6,32,64,128,254,253 trem 171 

330 DATA251 ,247,239,223,191,127 trem 43 
340 DATA32, 158, 183,164,2,96 trem 104 


35 supcavtc za* 




di P, Ferrari 


“Adagio’’ 


variazioni contenuta nel listato che se- 
gue. 

Le linee devono essere sostituite o ag- 
giunte s quelle del MUSIC EDITOR, 
Ciò permetterò di avere a disposizione 
due comandi supplementari, oltre a 
quelli del tasti funzione e del CLEAR, 
che risultano molto utili nel corso del* 
la scrittura dello spartito per corregge* 
re gli eventuali errori. 


Il primo (tasto ”£ f ') consente di Iniziare 
l'esecuzione del brano dal punto In cui 
è posizionato II cursore, evitando cosi 
di doverlo riascoltare ogni volta 
dall'Inizio. 

Il secondo (tasto "CTRL" + "*-**) fa 
"scivolare" verso 11 basso tutte le note 
del cursore In poi. In tal modo è possi- 
bile Inserire una riga che è stata inav- 
vertitamente saltata. 


D a digitare utilizzando il MUSIC EDI* 

TOR per C64 pubblicato sul n. 1 di 
SuperVlC, questo mese vi presentiamo 
l'Adagio In Sol min. di Albinoni - Gia- 
ietto, 

Chi non possiede il Floppy Disk dovrò 
armarsi di un po* di pazienza data la 
lunghezza del pezzo. 

Prima di passare al brano musicale, sa- 
rò utile apportare al listato originale le 

160 GOSUB210:lFERTHENGOSLJB960:GOTOllO 

tram 93 

220 ER»0:irV>0THBN235 :rem 238 

265 ER- 1 : 1FCTTHBNCT*0 : TfY-YY+1 : MO-tfO+l 

: reo 59 

266 RETURN : rem 126 

325 IFFEBK(653> ARD4THENGOSUB58Q sGOTOSOOO 

irem 200 

330 GETC8 ; IFC8- " "THEN3 25 tram 87 

350 I FA- 3 20RA- 4 20RA ■ 3 SOR ( A> 4 TARDA < 5 8 } OR [ A 
>64ARDA< 7 2) THEN470 : rem 13 

365 NN-1 : GOSUB4 80 : IFA-130RA- 170RA-290RA-1 
4 SORA- 1 57THENRETURN : rem 62 

366 I FA ■ 9 2THENA- 133: KM -HO : rem 236 

* 1050 FGRN-NRTOSZ : X FF ( N # 0 ) -OTHER1190 

: rem 14 9 

1005 FORV» ITO 3 : 1 FF ( H , V) < OTHERPOKEM , 0 

srem 242 


1086 NEXT : rem 14 

*'2510 FORI - 10T01STEP- 1 : IFMI D$ (BRS ,1,1) -* 

{ DES J “ORMI D8 ( 0R$ f I , 1 ) - “ "THBNNEXT 

: rem 173 

5000 GETC8 : IFC$“" "THEN5Q0Q :rem 177 

5010 A-ASC (C$) : GOSUB4 8 0 : 1 FA< > 9 5 ARDA < > 6 THE 
NA«0 e RETURN : rem 214 

5020 XI -XX : Yl-YY: CT- 1 : GQSUB760 :rem 134 
5030 FGRN-5Z- iTONOSTEP- 1 i IFF (N, 0) THENFORV 
-0TO3:F(H+l,V) -F(R,V> :NEXT : rem 211 
5040 NEXT: 20X249282,19- (N0-T0) :POKE255,14 
: 5YS4 9227 : P0KB4 92 8 2 r 19 : FORN-MOTOTO+1 
9 : rem 140 

5050 XFF (N , 0) THERGOSU87 50 : NEXT : rem 94 

5060 FORV- 0TO3 : F ( NO # V) « - 1 : REXT : A- 0 : GOSUB7 
70 : XX-Xl : YY-Yl : GOTO 4 50 srem 223 


013 24 


PCI : 

000 

000 

015 

014 

24 

3DC2: 

000 

000 

020 

015 

24 

Ul s 

017 

017 

065 

016 

01 

R^D 

127 

127 

126 

017 

01 


079 

079 

063 

018 

10 

O 1 

0 



019 

24 

C2 

020 



020 

24 

ROM 

060 



021 

01 

LEV! 

047 



022 

01 


023 10 


024 24 

025 24 


001 

20 

0 4 

fi* 3 

0 2 

026 

01 

002 

24 



0 3 

027 

01 

003 

24 



0 2 

029 

14 

004 

20 

0 4 

fi«3 

F 2 

029 

24 

005 

24 



F 3 

030 

04 

006 

24 



F 2 

031 

04 

007 

01 

0 4 

fi# 3 

D#2 

032 

04 

009 

01 

ft 4 



033 

20 

009 

10 

fi#4 



034 

24 

010 

24 



D#3 

035 

24 

011 

06 



D#2 

036 

24 

012 

06 

0 4 



037 

08 


0 4 

R#3 

B 

2 

039 

04 


0 3 





B 

3 

039 

04 

R#4 






D 

2 

040 

12 

fi 4 

R 3 

0 2 

R 4 

R 

3 

C 

2 

041 

04 

0 4 

fi# 3 


R#4 





042 

12 

0 4 

0 4 

R 2 

C 5 





043 

04 


D 4 





C 

3 

044 

12 


D#4 

fi 3 




c 

2 

045 

04 


0 4 


fl#4 

0 

3 

C#2 

046 

14 

F«4 

D#4 

fi 2 

R 4 





04? 

04 


C 4 


fi#4 





048 

24 

D#5 

C 4 

fi 2 




C#3 

049 

06 

D 5 


fi 3 




Cf2 

050 

04 


D#4 


fl 4 

0 

3 

b 

2 

851 

04 

C 5 



0 4 





052 

12 

R#4 

D 4 

R 2 

R 4 





053 

04 

fl 4 

D#4 





D 

3 

054 

12 

fl 4 

D 4 

fì#2 

fi 4 

F#3 

e 

2 

055 

04 


E 4 


0 4 

□ 

3 



056 

12 

* 

F#4 

fi# 3 

F#4 

R 

3 



037 

04 


0 4 


0 4 

fl#3 

□ 

2 

058 

30 

0 4 

0 4 

R#2 




0 

3 

059 

16 

0 5 

D 4 

ft#2 




o 

2 

060 

08 

F 5 


fi# 3 

D 5 

R#3 

0 

2 

061 

06 

0 5 



C 3 



0 

3 

062 

04 

D*5 

ti 4 

R#2 
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063 

04 

F 5 



133 

24 




D 

3 

207 

04 

0 3 



064 

04 

0 3 



136 

01 

R«4 



0 

2 

208 

04 

C 6 



063 

16 

0*5 

0 4 

0 3 

137 

01 

C 3 





209 

04 

0*6 



066 

08 


C 4 

C 4 

138 

08 

D 5 





210 

04 

C 6 


0 3 

067 

08 


0 4 


139 

01 

C 5 





211 

04 

0 3 



068 

04 

C 5 

fi*3 

C 3 

140 

01 

R#4 





212 

04 

0*5 



069 

04 


C 4 


141 

24 

R 4 

D 

3 

0 

2 

213 

04 

C 3 



070 

04 


a 3 


142 

24 




0 

3 

214 

04 

0*3 


0 2 

071 

16 

F 3 

a 3 

a 2 

143 

01 

R 4 



0 

2 

215 

04 

0 5 



072 

08 

0*3 


a 3 

144 

01 

R44 





216 

04 

0 6 



073 

08 

f 5 



143 

08 

C 3 





217 

04 

0*6 



074 

04 

D 3 

C 4 

R 2 

146 

01 

fì#4 





210 

48 

0 6 

C 3 

0 2 

075 

04 

0*3 



147 

01 

R 4 





219 

16 

*00 

G 3 

0 2 

076 

04 

C 3 



140 

76 

0 4 

0 

3 

G 

2 

220 

04 


G 3 

0 3 

077 

16 

D 3 

C 4 

A*2 

149 

44 

0 4 

B 

3 

0 

2 

221 

20 

C 3 

0*4 

C 3 

070 

08 


R#3 

R#3 

130 

00 

8 4 





222 

24 



C 4 

079 

08 


C 4 


131 

04 

G#4 





223 

24 



C 3 

060 

05 

R#4 

a 3 

R#2 

132 

04 

0 4 





224 

20 

C 3 

ft#3 

R*2 

081 

03 


R#3 


153 

04 

F#4 





223 

24 



R#3 

082 

06 


0 3 


134 

04 

0 4 





226 

24 



R#2 

063 

16 

0*5 

0 3 

0 2 

133 

02 

F 4 

0 

3 

0 

2 

227 

01 

C 3 

0*3 

0*2 

004 

00 

0 3 


0 3 

136 

04 

B#4 





228 

01 

0 5 



065 

08 

D#3 



137 

04 

0 4 





229 

10 

0*3 



066 

05 

C 3 

R#3 

G 2 

138 

04 

0*4 





230 

24 



0*3 

007 

05 

D 3 



139 

04 

F 4 





231 

08 



0*2 

008 

06 

am 



168 

04 

0*4 





232 

08 

C 5 



009 

16 

C 3 

R#3 

9 2 

161 

04 

0 4 





233 

24 

C 3 

0 3 

0 2 

090 

00 


R 3 

fl 3 

162 

04 

D#4 





234 

24 



G 3 

091 

08 


R#3 


163 

04 

0 4 





233 

24 



G 2 

092 

05 

a 4 

C 4 

fl 2 

164 

04 

C 4 





236 

01 

0 3 

F 3 

F 2 

093 

05 


R#3 


163 

04 

B 3 





237 

01 

0*3 



094 

06 


R 3 


166 

04 

C 4 





236 

10 

F 3 



095 

08 

D 3 

a 2 

R#2 

167 

64 

0 4 

0 

3 

0 

2 

239 

24 



F 3 

096 

08 


F* 2 


166 

16 

D 4 

0 

3 

G 

2 

240 

24 * 



F 2 

097 

08 


0 2 


169 

04 

8 3 

0 

3 

0 

3 

241 

01 

0*3 

E 3 

F*2 

098 

08 


F#3 


170 

48 

C 4 

0*3 

0 

2 

242 

01 

0 3 



099 

08 

0*3 

0 3 

C 3 

171 

08 

0 4 





243 

10 

0*5 



100 

08 


fl 3 


172 

04 

8*4 





244 

24 



F*3 

101 

44 

0 3 

R#3 

B 3 

173 

04 

0 4 





243 

24 



F#2 

102 

24 

ìw 



174 

04 

F#4 





246 

01 

D 5 

G 3 

0 2 

103 

08 

0 3 



173 

04 

0 4 





247 

01 

G 5 



104 

08 

a 3 

R#3 


176 

02 

F 4 

e 

3 

0 

2 

246 

14 

0 5 



103 

08 

R#3 



1 77 

04 

0*4 





249 

24 



G 3 

106 

08 

a 3 



170 

84 

0 4 





230 

04 

0 3 

B 3 

G 2 

107 

08 

0 5 



179 

04 

0*4 





251 

04 

C 3 

C 4 


100 

08 

F#3 

R#3 


180 

04 

F 4 





232 

04 

B 4 

0 4 


109 

00 

0 3 

mm 


101 

04 

0*4 





253 

20 

G 3 

0*4 

C 3 

110 

24 

F 5 

0 3 

R«2 

182 

04 

0 4 





254 

24 



C 4 

Ili 

24 



R#3 

183 

04 

0*4 





253 

24 



C 3 

112 

01 

F 3 


Ri 2 

184 

04 

0*4 





236 

24 

G 3 

D*4 

G 2 

113 

01 

0 3 



185 

04 

D 4 





237 

00 

F 3 


C 3 

114 

08 

G#3 



186 

04 

C 4 





238 

04 


C 3 


113 

01 

0 3 



187 

04 

5 3 





239 

04 

0*3 



116 

01 

F 3 



188 

32 

C 4 

0*3 

0 

2 

260 

12 

0 3 

0 3 

G 2 

117 

24 

0*3 

0 3 

C 3 

189 

24 

0 3 





261 

04 

C 3 

0*3 


118 

00 



C 4 

190 

04 

C 4 



0 

3 

262 

12 

, C 5 

F 3 

0 2 

119 

08 

C 5 



191 

84 

0*4 





263 

04 


0 3 


120 

12 

0*3 


0 3 

192 

04 

8 4 





264 

12 


0*3 

D 3 

121 

04 

0 3 



193 

04 

C 3 





263 

04 


0 3 


122 

24 

o 5 

8 3 

R«2 

194 

02 

0*5 

C 

3 

0 

2 

266 

14 

B 4 

0*3 

0 2 

123 

08 



R#3 

193 

04 

C 3 





267 

04 


F 3 


124 

08 

fl#4 



196 

04 

0 4 





268 

24 

0*5 

F 3 

0 2 

123 

12 

B 3 


fl#2 

197 

04 

0*4 





269 

08 

0 5 


0 3 

126 

04 

0 5 



198 

04 

0 4 



0 

3 

270 

04 


0*3 


127 

24 

C 3 

0*3 

□«2 

199 

04 

C 3 





271 

04 

F 5 



128 

24 



0#3 

200 

04 

0*5 





272 

12 

0*5 

G 3 

0 2 

129 

01 

C 5 


042 

201 

04 

G 5 





273 

04 

0 3 

F 3 


130 

01 

D 3 



202 

04 

0*3 



0 

2 

274 

12 

0 3 

0 3 

0*2 

131 

08 

D#5 



203 

04 

C 5 





275 

04 


R 3 


132 

01 

E 5 



204 

04 

0 4 





276 

12 


B 3 

0*3 

133 

01 

C 3 



203 

04 

C 3 





277 

04 


0 3 


134 

24 

R#4 

8 3 

D 2 

206 

02 

0*5 

e 

3 

0 

2 

278 

30 

C 3 

C 4 

0*2 


1 






sa supere- 2 il* 



ERRATA CORRiGE 


Mei listalo Melodìa 2' T di "Far musica 
con il computer". apparso su SOPKR 
VIC n. I va modificata come segue la 
linea 15: 

15DATA195.3.L87J J83.2J75.2 
É 163 2. 1 75 2.1*0.?, 163.?, 175.1 



» i 
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Libri firmati JACKSON 


U Pigtwo cortftmgnc «! ptttmo ri pino p«i L Me* umr c«**riU*g hio 


Bobini * Bagfioni 

FORTH 

Como e perché - dopo «osarsi affermato in 
campo scientifico e industrialo - ii FORTH è 
sempre più usato anche come linguaggio per 
Personal Computer, Strutturato su due piani, il 
volume si propone come "manuale di 
apprendimento" e come "manuale d'uso” dei 
FORTH applicato al VIC 20 e al CBM 64. 

160 pagine. 

Codice 527 B L 11.000 


Francesconl * Paterfrni 
VOI E IL VOSTRO COMMODORE 64 
Un esauriente vademecum sulla 
programmazione in BASIC dei Personal che va 
oggi per la maggiore. Facile, brillante, ricco di 
programmi testati questo d un volume prezioso 
anche per il più inesperto degli utilizzatori che. 
oggi, trova finalmente II modo più semplice per 
entrare nel mondo dei computer. 256 pagine 
Codice 347 fi L 22.000 


Rita Boneili 

COMMODORE 64 IL BASIC 

Un'accurata esposi nono dei linguaggio BASIC, 
accompagnata da numerosi esempi. 

Un BASIC visto dall'interno Un libro di 
programmi per imparare a programmare. 

Par una maggior praticità a immediatezza d'uso, 
tutti i programmi esemplificativi riportati nel libro 
sono disponibili * a richiesta - su floppy disk. 
316 pagine. 

Codice 348 D L. 26.000 


vogliati anomali 


CEDOLA DI COMMISSIONE LIBRARIA 


C AHwga nwo 4f*t Bivi 


MI C/e * HQMJ03* 
C Amo Vi oc oc** a 


" * 


runa 


rMwmt *A* A ll M i tl richieda l'anUVH m Mtairl 


IV* 





LA TAVOLETTA GRAFICA A PIENE PRESTAZIONI 
AD UN PREZZO ACCESSIBILE A TUTTI 



La tavoletta grafica KOALA è la più simpatica innovazione nel campo dei personal 
computers. Con KOALA, controllate il vostro computer con un dito. Più veloce 


tì' M’t/, 



paddle, più versatile di un joystick e più 
lic “ 


di un 

semplice di una tastiera. 

La tavoletta grafica KOALA è compatibile 
con la maggior parte di software esistente 
e viene fornita completa 
del suo programma 
grafico 'Micro lllustrator". 

KOALA-PAD è il miglior 
modo per creare 
immagini ad aita 
risoluzione con il vostro 
computer. 



COMPUTER GRAPHICS DIVISION 

MILANO: Wo L. do Vìnci, 43 - 20090 Trazzano S/N 
Tel. 02/4455741/2/3/4/5 -Tlx : TEUNT 1 312827 
ROMA: Vi a Sobria, 1319- 001 38 Roma 
M 06/691 7058-691931 2 - Tìx. TINTRO 1 614381 




dorè può essere memori risto su no 
atro o dischetto magnetico e quindi ri- 
preso e ristampato In qualsiasi mo- 
mento. 

Dotato di una stampante e del Vie Wrl- 
ter. Il VtC 20 è quindi In grado di sosti- 
tuire validamente una macchina per 
scrivere e di risolvere facilmente qual- 
siasi problema di gestione e correzione 
di testi In ambiente domestico o 


nell'ambito di una pìccola attiviti di af- 
fari 

Vk Writer è venduto a L 75.000 + 
IVA 

V1C WRITER 

è distribuito da Commodore Italia 
- via Gracchi, 4B 20092 
Gioiscilo B* (Milano) 


Vie WRITER 


D Ùopo esseri conquistato una lar- 
ghissima fama come ottimo video- 
gioco e aver riscosso notevoli consensi 
come macchina per J insegnamento II 
V1C 20 sta ora rivelando le sue doti di 
“piccolo grande computer a tutti gli ef- 
fetti" dimostrando di essere in grado di 
occuparsi anche di problemi gestionali 
e di office automatico. 

La Commodore ha infatti recentemen- 
te presentato per questo calcolatore il 
“Vie Wrlter f \ un programma che lo tra- 
sforma In un piccolo ma potente word 
processor, cioè In una macchina per 
scrivere elettronica. 

Il “Vie Writer" Commodore, che per 
Tuso richiede una espansione da 6 a da 
16 K Ilo byte F è disponibile sia In versio- 
ne su disco che In versione su nastro, 
consentendo in tal modo una gestione 
dei testi anche a chi possiede solamen- 
te una configurazione minima. 

Non appena acquistato 11 programma è 
subito possibile cominciare a creare 
testi scritti anche di rispettabile lun* 
g he zza e memorizzarli su disco o cas- 
setta senza bisogno di lunghe ore di 
addestramento. Il manuale che accom- 
pagna Il programma è Infatti struttura- 
to In modo tale che anche un neofita, 
dopo aver letto poche pagine, può la- 
vorare autonomamente. 

Il vantaggio principale della scrittura 
elettronica, e quindi del Vie Writer 
Commodore, è rappresentato dal fatto 
che un qualsiasi testo viene composto 
sul video, e stampato solamente una 
volta ottenuta la stesura definitiva, ri- 
sparmiando In tal modo il tempo che 
prima era spesso nelle brutte copie, 
nelle correzioni o nelle ribattiture. 
Oltre che stampato su carta, un testo 
originato tramite Vie Writer Commo- 


a cure della redazione 
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Get more from thè VIC 20 

(Ottieni di più dal VIC 20) 

cod. BGRC005 L. 14.900 
di Owen Blshop 



Owen Bishop è veramente un “ matta- 
tore" nel campo del libri dedicati alla 
produzione Commodore, tant'è che ha 
ormai scritto ben trenta libri dedicati 
ai personal computer. Questo libro in 
particolare si rivolge a tre tipi possibili 
di lettori' in primo luogo, a chi ha ap- 
pena acquistato un VIC 20 e cerca 
qualche notizia sulla sua programma- 
zione un po più approfondita di quelle 
che si trovano nel manuale In dotazio- 
ne; in secondo luogo, a chi e passato al 
VIC da un altro computer, (quindi è già 
a conoscenza della programmazione 
BASIC) ma cerca qualcosa che gli per- 
metta di familiarizzare rapidamente 
con il VIC 20, Il terzo tipo di lettore al 
quale il libro si rivolge è l'appassionato 
di musica e di grafica che vuole sfrutta- 


re appieno ;e no te voi capacità del VIC 
In questi settori. 

Un libro compiete quindi, ricco di pro- 
grammi esemplificativi che girano sul- 
la versione base del VIC (non sono ri- 
chieste quindi espansioni di memoria) 
e che permettono di esplorare comple- 
tamente sia 1 hard* are che le possibili- 
tà software della macchina; in chiusura 
compare uno utile appendice che com- 
prende tabelle e nozioni utili per una 
rapida consultazione. Anche per que- 
sto volume volgono e considerazioni 
circa la qualità d: stampa che sono sta- 
te fatte per i due precedenti. 

Programmine wlth gra- 
phics 

(Programmare con la gra- 
fica) 

cod. BGRC006 L. 14.900 
di Garry Marshall 

Chi di noi patiti del computer non ha 
mal provato il desiderio di simulare 
con I nostri C64 o VIC 20 le grandi pre- 
stazioni del computer usati per li 
CA,D, (Computer Aided Designi Ri- 
cordate qualche anno fa la pubblicità 
di una diffusa utilitaria italiana che 
sfruttava uno splendido disegno tridi- 
mensionale generato dal computer? 
Anche se non sarà mai possibile con le 
nostre "macchinette" raggiungere si- 
mili traguardi, sì possono tuttavia otte- 
nere risultati Insperati nella grafica, a 
pattodi conoscerne i "trucchetti". Que- 
sto libro, dedicato agli utenti di qual- 
siasi marca di computer, esamina tutti 
I problemi che si possono presentare a 
chi usi il computer per ottenere del di- 
segni. animati e non, in alta risoluzio- 
ne, Vengono anche proposti, a titolo 
dimostrativo, dei programmi scritti in 
BASIC che, con poche modifiche, pos- 
sono girare su diversi computer (in 
particolare per 11 VEC o 11 C64 le modifi- 
che da apportare sono veramente po- 
che). L'ultima parte del libro è dedicata 
ad un'analisi dettagliata delle capacità 



grafiche di ben venticinque elaboratori 
diversi; un aiuto molto valido per chi 
fosse indeciso nell'acquisto di un cal- 
colatore dotato di possibilità grafiche. 
L'Autore non ha bisogno di presenta- 
zioni. essendo stato collaboratore di 
"Computer and Video Qemes Magazl- 
ne fin dalla nascita di questa rivista. Il 
libro è scritto In buon Inglese e facil- 
mente leggibile anche per chi avesse 
una conoscenza solo superficiale di 
questa lingua. 


f 

I libri possono 
essere ordinati 
utilizzando 11 
coupon a pag. 66 
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Vendo perfetto VK 20 + 3 libri 
sull'ileo + 60 PRO {molli In LM). 
Comprilo d« pochi mesi 
LJ50 D00 - vendo separata mente 
PRO per C64. Autocalcio. Burger 
Time, Pacman e nitri. Copie disco 
eoo singolo Drive. 

Arnoldo ReelefJi Vi* Udii. 135 * 
20023 Legnano Mi ■ Tel. 
0331*96582 

i 

Vendo programmi per VK 20 op- 
pure li scambio o Invio uno cassai 
ti di programmi * chi me ne Imi* 
una. 

Glauco P lattei l. Vie Einaudi, 1 ■ 
20093 Cotogno Monne* MI - 

Acquisto per II VK 20 tspanslonl di 
memoria 3K 5UPER/EXP « I6K 
RAM, solo et In ottimo stato * vere 
occasioni. Sono inoltre Interessato 
a qualsiasi tipo di software per 
questo Computer assicuro massi- 
ma serietà. 

Enrico Wverich* * VI» Monte Rite. 
10 - 32040 Tal di Cadore BL - 

Vendo per VK 20 cassetta con 60 
programmi anche in linguaggi 
macchina ai pretto di L 200.000 
postali. 

Ivano Sartori Via Salpanti. 10 - 
38068 Rovereto TN - 

Favolosol Vendo a preira di 
L 73-000 una cassetta con 12 pro- 
grammi del Commodore 64 (Ani- 
hilator. Carnei, Dame. Flight, Si- 
mulator, Grlddar. Frogger, Elico! 
ieri, Moon Bloom. Motor Mania, 
Othello, Sintetizzatore. Caldo) a 
richiesta anche su disco (L. LO. 000) 
posso anche cambiare J giochi. 
Maria Luisa Brambil lasca Via 
Gramsci, 23/ 2 20041 Agrate 

Brìaraa MI - Te 1039/630635 ore 
idfldo. 

Ho 19 anni possiedo un Commo- 
dore 64 + registratore a cassette c 
mi interessa acquistare software 
per II mio apparecchio, accetto 
molto volentieri programmi per la 
matematica dal Jkeo adamitico e 
Data Basa, 

Cesare Ranieri Vi* Aldo Moro, 9 - 
88060 Marina $. Andrea Jonio - C2 
- Tel. 0967/43027 

Vendo per C64 giochi Othello. Al- 
to Medioevo, Torre Hanoi, su ces- 
ante con Istruzioni in italiano tutti 
per L 20. 000 più spese spedizione 
scrivere*: 

Mario Berardo - Via Vittorio Ema- 
nuele. 265 12042 Bri ■ CN - 


Vendo CBM64 + Data Sette C2N 
+ completa documentazione tec- 
nica guida riferimento per pro- 
grammare tantissimi listati. 
Fabrizio Sestetti G, Verdi, 6 - 
24040 Canonica DAdda ■ BG - 
Tel. 033/8831 07 ore ufficio, 

Tel. 02/9097650 ore pasti. 

Contatterei possessori di C64 per 
scambio programmi od esperlen- 

i*. 

Vendo, inoltre, per sole L 100,000 
1 seguenti cartridge per VK 20-, 
Me» Vftter, Vie Start e Rader Rat 
Race, 

Giovanni Coni - Via Edoardo Bes- 
tini, 13 - 00131 Roma > 
T*l,06*3 11422. 

Compro registratore C2H per 
CBM64 a L60 000-70 000 Oppu- 
re cambio per CM2 + Joystick, più 
modo materiale e software: mia 
chitarra elettrica con l 2 p+ckup 
nuovi più cavo Jack. 

Solo Emilia Romagna. 

Andrea Marni™ - Via GantsgalN, 
19 48018 Faenza RA - 

Tel.0346/23474 ore serali. 

Cambio programmi per Comma 

Massimiliano Molino - C,so Salve- 
mini. 53 ■ 10093 Grugnisco - 
Tei. 01 1/306183, 

Compro programmi per C64 gio- 
chi totocalcio Commercial l cerco 
anche unità disco. Purché prezzo 
basso. 

Glusepa Borracci - Via Mameli, 13 
. 330100 Odine - 

Compro registratore per C64 pur- 
ché In buone condizioni, solo pro- 
vincia di Bari, 

Donato Romito - Via Papali!. 7 pai. 
B/23 70126 Bari ■ 

Tel. 080/384762. 

Compro cassette co/i videogiochi 
per C64 o programmi di vlòeogio 
chl per lo stesso, 

Christian CabrioJu Via Poggio dei 
Pini 09012 Capoterra - CA - 
TeLOTO/7 11247. 

Sono un nuovo utente del CBM 64, 
desidererei acquistare listati e pro- 
grammi su cassetta riguardanti 
giochi, statistica e grafica: assicu- 
ro risposta. Inviare lista e prezzi ■; 
Adriano Bochese C. Marconi, 6 ■ 
37030 Belfiore D Adige - VR - 
Tel. 045* 16338, 


Compro program mi in cassetta per 
Il CBM64 inviar* Hata programmi 

a: 

Danilo Errisi ■ Via Bruno Buoni, 2 
- 09170 Oristano, 

Cerco 064 più un eventuale regi- 
stratore a cassette C2N, 

Per le offerte telefonare e; 

Alberto Ferrari Vis S. Michele 
Del Carso, 22 - 10133 Torino 
TH01 1/3411 19 

Causa prematura scomparsa del 
mio CBM 64. vendo quattro di- 
schetti doppia faccia conte menti 
tutto il mio software a L 350 000 o 
scambio con stampante per detto 
computer, 

Carmelo Cuculi - C so Italia. 60 
93014 Glarre CT * 

Tel .093/933369, 

Cambfofaendo software per C64. 
Centinaia di programmi: Tht last 
one. petspeed, omnkralc. easy 
script, pascal, besm. forth, veloci i 
tatori di nastro, 80 colonne e lutti I 
migliori game*, game*, richiedere 
lista a: 

Mauro Tali - Via Roma. 87 000 # 
Clamplno « ROMA 
Tei, 06/61 15249. 

Compro Floppy Disk per C64 pro- 
grammi giochi e totocalcio. Cerco 
informazioni su com* duplicare 
programmi, 

Giuseppe Borracci - Vi* Mameli. 

13 - 33100 Udine 0432/291663 
ore pasti. 

Cambio vendo per C64 programmi 
di ogni genere. Sono anche dispo- 
nibile per ogni genere di notizia 
aoftware/hardware. inviare Hata del 
programmi o una busta affrancata 
per II mio elenco. 

Michele Perniola Vi* Indipenden- 
za, 22 ■ 70031 Barletta - 
T el .0683/33390. 

Vendo VK 20 * SUPER EXPAPt- 
DER + regia retore Commodore 
+ Monitor linguaggio macchina 
* cartridge gioco scacchi, * joy- 
stick a motti programmi fra cui 
molti originati Commodore in IM 
a motti libri sui VK 20. Tutto In 
blocco a sole L 430.000 
Amedeo Fatano - Re*. Sagittario - 
20090 Sagrate ■ MI * 
Tel .02/2 130331. 

Compro programmi su casearie * 
dischetto per C64. 

Vittorio Séchel - Via Virenti, 4 
20073 Lodi M» Taf 0371/66023. 


Compro RAM 32K per VK 20 solo 
a prezzi modici. 

Luigi Fiorone - Via Del Lavora, 
15/a - 72100 Brindisi Tel.223886. 

Vendo programmi 30 per VK 20 
su cassetta a L 25.000 alcuni in LM 
□lochi e utility. 

Luciano Baglionl - Via Della Verna. 
20 00141 ROMA 06*99286 do- 
po ore 21. 

Vendo bellissimo programmi di si- 
mulazione spaziale per CBM64, 
Potrete esplorare una parte di ga- 
lassia alla ricerca di stelle instabili. 
22tV Richiedere informazioni , *lle 
dando francobollo L.400, a: 
lanini Stefano Vi* C Sforza, 33 - 
47100 Forti - Tei 26271 
* Allego L.2.500 in francobolli. 

Vendo compro scambio program- 
mi per C64 tu nastro o listati. In- 
viale la vostra listo oppure un fran- 
cobollo per la risposta a; 

Lauro MicheiotH Via Bobolu la 
51017 Pascla PT - 


Vendo VK 20 + Espansione grafi- 
ca a RAM SUPER ESPANDER * tl 
libro "All# scoperta del VK 20" e 
interfaccia per qualunque regia re- 
tore. fi tutto a soie L240.000 (prez- 
zo dal VK Inetpanau). Par Informa- 
zioni rivolgersi a: 

Albano Ferrari - Via S. Michele 
Del Carso. 22 - 10133 Torino 
Tei.Oj 1/341 119. 

Compro cambio vendo per VK 20 
cassetta contenente software di vl- 
deoglochl. a H 0.000 8 videogio- 
chi, Sono Interessato a cartridge 
copiate su nastro e tono disposto e 
comprarle. 

Gianluca Bertolott! Pua Mi nuo- 
ci* no. 72 ■ 00139 Roma - 
Tel .06/8121760 

Vendo programmi Ingegneria dv. 
per VK 20 - telalo, travi, muro di 
■ottegne. 1373» TR. Su suolo «ta- 
ttico. plinti. 

Francesco Polla Virginio, 3 - 
10064 Plnerolo Tel .021/73362» 

Vendo e cambio software per VK 
20 e CBM e C64. Chiunque voglia 
acquistare software invi* LS0G per 
ricevere la Usta di software dispo- 
nibile. Cotto medio dJ un program- 
ma LI. 500 Disponibile software 
In linguaggio macchina. 

Giovanni Tarai Vt* Mottetto, 40 
? Il 0Q Foggi* - Tei.32071 
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jee 


JCC 


GIOCHI 


Cedola di commissione da inviare a: 

JCE - Via dei Lavoratori, 124 * 20092 Onisello 8. - MI 
Inviatemi i seguenti programmi: 


Cod. progr 

Q-tà 

Cod. progr 

Otà 

Cod progr 

Otà 

c 

1 1 1 

T 

1 

1 

1 1 

Cod. progr 

Q.tè 

Cod. progr 

Q là 

Cod. progr 

Gtl 

c 

I 1 1 

i 

A 1 

1 

1 1 

Cod progr 

otà 

Cod, progr. 

Q là 

Cod progr. 

Otà 

i i i i i i i i i 

Desidero riceverà li materiale indicalo nella tabella, a mazzo pecco posiate 
contro assegno, al seguente indirizzo 

Nome [ 

TTT1 

1 1 -1 1 1 

1 [ 

XTTTT 

TT1 

Cognome | 

1 1 1 1 1 1 1 1 

1 1 

UHI 

_LU 

v* LLL 

T~m 

LLl 1 1 

11 

1 1 1 1 1 1 1 ] 

™ Il I II I I 

1 1 II 1 1 1 1 1 1 1 1 1 1 

Data FI 

m 

r ri i i 


cap ; | | 

~m 

Desidero ricevere la (altura 

i*i i"° 





Partita IVA, o per I privati Codice Bacala 

m i i i i i i i \ i i i i i i 

PAGAMENTO: 

A) Anticipato, mediante assegno Circolare o vaghe poetala par l'importo 
totale deflordlnazione 

8) Contro assegno al poetino iim porlo totale d#B ordinazione 
AGGIUNGERE L 2 000 per contributo Ateo. I prezzi tono oomprenstvi di IVA. 


iPt 


HOME UTILITY 


TECNICA 


I 









* 




OFFERTISSIMA - EXELCO - 

La EXELCO vi propone due vantaggiosissime combinazioni COMMODORE 

Affrettatevi è un'OFFERTA irrepetibile!!! 


NON PERDETE QUESTE OCCASIONI!!! 


Combinazione n 1 


n° 1 COMMODORE CA4 
n° 1 Regìitratof* «MAXTRON» 
n° 1 Libro «C&4 EXPOSED. 
n° 1 libro «Impariamo 

ad usar* il pononal computar 
n° 1 Cauefta Software 

«Garden Wan» della JCE 

Totale 


L 699.500 
L 82.000 
L 24.000 

L 25.000 

L. 20.000 


A SOLE L 750.000 Y> 

IVA INCLUSA W 


Combinazione n° 2 


n° 1 COMMODORE VIC 20 
n° 1 JOYST1C «TRIGA» 
n° 1 libro a Imperiamo 

ad userò il personal computer 
n° 1 Cassetta Software 
« AD VENTURE LAND» 
n° 1 Cassetta Software 

«RIDE ON FORT KNOX* 


L. 1 49,000 
Le 31-000 

L 25-000 

Le 49-000 

L 49-000 


Totale L. 3j 

A SOLE L 258.000 ?> 

IVA INCLUSA W 


COMBINAI IONI 1: 

ri" 1 COMMODORE CM 
rP ì -MAXT1QN- 

n°l Ubro*CódfXPOSED. 
rP 1 Ubf o rinponamo 
ad usare I penerai computa 
rP 1 Cai vero Software 
«Garden Won* JCE 


Q là 

Prezzo 

unitaria 

Prezzo 

Totale 


L 750.00(1 



U25S.OOO' 



Desidero ricevere il materie!» indicato nell» letali*, e meno pecco postele 
contro assegno, el seguente indirizzo: 


Vi» 


Il M M II l 

ILI L-LLL 

TTT1 

*1 111-11 1 1 

I 1 1 111 

IMI 

1 1 1 1 1 1 u 1 

1 1 1 III 

IMI 

1 1 1 11 III 1 

1 1 1 1 1 1 

Il II 

LU LU LLL 

□ CA.r.r 

IMI 


Desidero ricéver» I» fatturi [fj] [*°[ 

Partita I V A. o. per i privali Codice F licei t 

rrn i i i i m i irrm 

PAGAMENTO: * 

~ A) Anticipala, mediente augno circolare » vaglia postale per rimporto totat* 
deM'ordM ertone 

Bl Contro «agno, in guelfo ceto. 4 i< 


i 


Ha 

AGGIUNGERE L. 5 000 per contributo tnw. I 


I accorrlo di Un 50 000 
ito contro MctgnO 
premivi di I V A 


Via G Verdi, 23/25 

20095 CUSANO MI LAN INO Mitene 


SI ACCETTANO FOTOCOPIE 0! QUESTO MODULO POMPINE 



I giochi del VIC 20... 


2 ne paghi 4 ne prendi 



(...li scegli tu. 4 games ai prezzo di 2) 

4 VatKMà ino ai X) giugno 1964 


Divertimento doppio per it tuo VtC 20i 
Oggi paghi 2 games a ne prendi 4, 
scegliendoli nella vasta gamma di giochi 
thè trovi dal tuo rivenditore Commodore 
Ma affrettati, perché i favolosi giochi del 
VIC stanno andando a ruba. . e fatti furbo: 
porta con te un amico e dividi eoo lui it 


S Commodore 

1 COMPUTER 


cosfo deile cartucce ; così ne porti via un 
mucchio, tutte originali, già pronte per 
giocare, e durano un secolo t 
Con VtC 20 giocare è un affare 
Per altre informazioni, telefonaci subito: 
02-618321. 

Commodore Italiana S.p.A 


